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ABSTRACT 


The objective of this work is to perform simulation modeling of the Signaling 
System No.7 (SS7) network with particular emphasis on modeling of the Message 
Transfer Part Level 2. The basics of common channel signaling using Signaling System 
No. 7 is initially outlined and discussed with reference to the ITU-T Q.7xx-Series 
Recommendations. This includes the protocol stack, signaling points, signaling links and 
typical network structure. In particular, the functionality of the Message Transfer Part, 


which provides the main mechanism to convey signaling messages, 1s discussed in detail. 


Subsequently the modeling of the Message Transfer Part, in particular MTP level 
2, using the simulation tool OPNET from MIL3. Inc. is presented. The model uses a 
multi-layer modular approach, with each layer corresponding to the SS7 layer it is 
modeling. The functional blocks within each layer are thought of as processes. With their 
buffers and processors, these processes form a complex interlinked queuing model] that is 


complicated to analyze but is readily simulated. 


In order to illustrate the use of the simulation model, the basic linkset delay 
between two signaling points under a heavy traffic load is simulated and compared with 


analysis based on M/G/1 queuing models. 
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I. INTRODUCTION 


The objective of this work is to perform a multi-layered discrete event modeling 
of the SS7 network for simulation. Detailed representation of functional procedures for 
the Message Transfer Part will be incorporated to the maximum extent possible. To 
further illustrate the use of the model, Link Delay simulations using the model are 


performed and compared with results obtained from a conventional queuing model. 


A. BACKGROUND 
1; Common Channel Signaling 


Since the invention of the telephone in 1876, signaling has been linked to analog 
circuit switching in the Public Switched Telephone Networks (PSTN). Signaling 
messages were initially multiplexed on a single line, using separate channels from voice 
called In-Band signaling. However, later introduction of Stored Program Control (SPC) 
exchanges followed by digital exchanges allowed the possibility of applying digital 
computer communication techniques to provide a dedicated data communication network 
for the transfer of signaling information between exchanges. This form of signaling is 


called “Common Channel Signaling”. 


In 1976, CCITT began work on standardizing a common channel signaling 
standard called Signaling System No.7 (SS7). This standard underwent several stages of 
refinement. In succession appeared, the Yellow Book Recommendations in 1981, the Red 
Book in 1985 and the Blue Book in 1989 prior to the present ITU-T Q.7xx-Series 


Recommendations. 


Today, SS7 has been widely implemented, forming the control structure behind 
the modem day telecommunications network. Due to SS7’s reliability and ability to 
support non-circuit related services, its application has not been limited to just call 
connections in telephone networks but has since been extended to providing signaling 
services in Integrated Services Digital Network (ISDN), Broadband ISDN, Advance 
Intelligent Network (AIN) and also Mobile Telephone systems. 


pe Performance Analysis 


Conventional performance analysis of the constantly varying modern day 
telecommunication networks using statistical models and queuing theory has proven to be 
complicated and restrictive, especially when networks become increasingly large and 
changes are often. Discrete event modeling and simulation offers a new approach to 
network analysis, especially when quick impact studies are required for the introduction 


of new services, new routing algorithms or new equipment. 


William and Kuhn [1] modeled the Blue Book specifications of SS7 by 
representing the major functional elements in the specifications with servers and queues 
to form a multi-layered model. Unfortunately, the model is limited to a steady state 
network analysis as stationary conditions using Markovian queuing theory are assumed. 
In Unger, Goetz and Maryka [2], the dynamic analysis of large SS7 systems using 
discrete event modeling is addressed. The improvement presented in this thesis is 
achieved through detailed incorporation of the message handling and network 


management procedures of SS7. 


B. DISSERTATION OVERVIEW 


In this work, the details of SS7 are first discussed in Chapter II. The notion of 
signaling points, signaling links and a signaling network are explained followed by a 
detail description of the Message Transfer Part. The basic procedures of the various 
functional blocks in the layer are explained. This includes alignment, error correction and 


detection, and routing. 


The use of the simulation tool, OPNET, to model the Message Transfer Part is 
discussed in Chapter III. The implementation of the various functional procedures, 
buffers and processors (servers) in OPNET are explained. As an illustration, a two- 
signaling-point network is constructed for link delay analysis under heavy traffic load 
conditions. For comparison, the link delay analysis based on Markovian queueing models 
is also derived in Chapter IV. Chapter V then summarizes the simulation results and 


compares them with that obtained using queuing models. 


ho 


Finally, Chapter VI provides the concluding remarks involved in the simulation 


modeling of SS7, and Appendix I contains the C source code for the OPNET model. 
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II. SIGNALING SYSTEM 7 


A. INTRODUCTION 


SS7 Q.7xx-Series Recommendations is a global Common Channel standard for 
telecommunications defined by the International Telecommunication Union 
Telecommunication Standardization Sector (ITU-T). The recommendation mainly 
defines the procedures and protocol by which the Public Switched Telephone Network 
(PSTN) exchange signaling information over a separate dedicated digital network to 
effect wired and wireless (cellular) call setup, routing and control. From the ITU 
definition of SS7, there are also several national variants such as the American National 
Standards Institute (ANSI) and Bell Communications Research (Bellcore) standards used 
in North America and the European Telecommunications Standards Institute (ETSI) 
standard used in Europe. Nevertheless these variants differ slightly only in format, and 
their compatibilities are maintained at the international level. Henceforth, the ITU-T 


recommendations will be used as the main reference for further discussion in this thesis. 


As mentioned, the use of SS7 was originally intended for PSTN networks; 
however, due to its high emphasis on reliability and availability’, the use of SS7 has been 
extended to provide signaling services to ISDN and AIN systems. It appears that it will 
conitnue in this role even with the expansion of wireless networks and the introduction of 


Broadband ISDN networks. Some of the most commonly used services of SS7 are: 
e Basic call setup, management, and tear down. 


e Wireless services, such as personal communications services (PCS), wireless 


roaming, and mobile subscriber authentication. 
e Toll-free (800/888) and toll (900) wired services. 
e Enhanced call features, such as forwarding, caller ID and three-way calling. 


e Efficient and secure worldwide telecommunications. 


' SS7 has set a high availability objective of 99.9998% for any signaling route. This corresponds to a 


maximum permissible downtime of only 10 minutes per year. 
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B. SIGNALING POINTS AND SIGNALING LINKS 


Signaling in SS7 basically involves the transmission of data packets called 
Signaling Units (SU) via a digital network comprised of nodes called Signaling Points 
(SP). All signaling traffic originates and terminates at a signaling point. As shown in Fig 
2.1, there are three types of signaling points, namely Service Switching Point (SSP), 
Signaling Transfer Point (STP) and Service Control Point (SCP). Each signaling point in 
the SS7 network is uniquely identified by a numeric point code. Point codes are carried in 
signaling messages to identify the source and destination of each message. Each signaling 


point uses a routing table to select the appropriate signaling path for each message. 
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Fig 2.1 SS7 Signaling Poi 
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SSPs are switches that originate, terminate, or tandem calls. An SSP sends 
signaling messages to other SSPs to setup, manage, and release voice circuits required to 
complete a call. An SSP may also send a query message to a centralized database (an 
SCP) to determine how to route a call (e.g., a toll-free 1-800/888 call in North America). 
An SCP sends a response to the originating SSP containing the routing number(s) 
associated with the dialed number. An alternate routing number may be used by the SSP 
if the primary number is busy or the call is unanswered within a specified time. Actual 


call features vary from network to network and from service to service. 


In more complicated networks, traffic between signaling points may be routed via 
a packet switch called an STP. An STP routes each incoming message to an outgoing 
signaling link based on routing information contained in the SS7 message. Because it acts 
as a network hub, an STP provides improved utilization of the SS7 network by 


eliminating the need for direct links between signaling points. 
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The signaling links between signaling points are formed by bi-directional 
channels. The most common data rate used on a signaling channel is 56 or 64 kbps. 
Although higher data rates can be used, the 56/64 kbps bandwidth could still adequately 
serve the signaling traffic in modern day SS7 networks. Typically, more bandwidth is 
achieved by bundling multiple links. When more than one signaling link exists between 


two SPs, it is called a Linkset. 


Unlike earlier signaling networks, SS7 signaling links are dedicated to carrying 
only signaling traffic. All signaling occurs out-of-band on these dedicated channels rather 
than sharing in-band with the voice channels. Hence it is also widely called common 


channel signaling. Compared to in-band signaling, out-of-band signaling provides: 
e Faster call setup times, 
e More efficient use of voice circuits, 


e Support for Intelligent Network (IN) services which require signaling to 


network elements without voice trunks (e.g., database systems), and 
e Improved control over fraudulent network usage. 


Because the SS7 network is critical to call processing, SCPs and STPs are usually 
deployed in mated pair configurations in separate physical locations to ensure network- 
wide service in the event of an isolated failure. Links between signaling points are also 
provisioned in pairs. Traffic is shared across all links in the linkset. If one of the links 
fails, the signaling traffic is rerouted over another link in the linkset. The SS7 protocol 
provides both error correction and retransmission capabilities to allow continued service 
in the event of signaling point or link failures. Fig 2.2 illustrates the separation of 
signaling links from voice trunks between exchanges (symbol “Ex”), and the use of 
mated pairs for STPs and SCPs to achieve redundancy. The mesh structure or quad 


structure formed by the two mated pairs of STPs are commonly used in North America. 
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Fig 2.2 A Typical SS7 Network 


C: SS7 PROTOCOL STACK 


Like all network protocols, the hardware and software functions of the SS7 
protocol are divided into functional levels [3]. The relation between these levels as 
compared to the Open Systems Interconnect (OSI) 7-layer model defined by the 


International Standards Organization (ISO) 1s illustrated in Fig 2.3. 


Among the SS7 layers, the layers above the Message Transfer Parts (MTP) are 
considered the user layers, which generate signaling units for their own purposes. The 
role of the MTP layers is to ensure signaling units sent by the upper layers are delivered 
accurately and efficiently to their destination. The Message Transfer Part is divided into 
three levels with MTP Level 1, 2 and 3 being equivalent to the OSI Physical, Data Link 
and Network Layers, respectively. The lowest level, MTP Level 1, defines the physical, 
electrical, and functional characteristics of the digital signaling link. Physical interfaces 
defined include E-1] (2048 kb/s; 32 64 kb/s channels), DS-1 (1544 kb/s; 24 64 kp/s 
channels), V.35 (64 kb/s), DS-0 (64 kb/s), and DS-OA (56 kb/s). More detail discussion 


on these layers will be presented in the subsequent sections. 


Data Link 
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Fig 2.3 SS7 Protocol Stack and The OSI Reference Model 


The ISDN User Part (ISUP) defines the protocol used to set-up, manage, and 
release trunk circuits that carry voice and data between terminating line exchanges (e.g., 
between a calling party and a called party). ISUP is used for both ISDN and non-ISDN 
calls. However, calls that originate and terminate at the same switch do not use ISUP 


signaling. 


In some parts of the world (e.g., China and Brazil), the Telephone User Part 
(TUP) is used to support basic call setup and tear down. TUP handles analog circuits 


only. In most countries, ISUP has replaced TUP for call management. 


Signaling Connection Control Part (SCCP) provides connectionless and 
connection-oriented network services and global title translation (GIT) capabilities 
above MTP Level 3. A global title is an address (e.g., a dialed 800 number, calling card 
number, or mobile subscriber identification number), which is translated by SCCP into a 
destination point code and subsystem number. A subsystem number uniquely identifies 
an application at the destination signaling point. SCCP is used as the transport layer for 


TCAP-based services. 


Transaction Capabilities Application Part (TCAP) supports the exchange of non- 
circuit related data between applications across the SS7 network using the SCCP 
connectionless service. Queries and responses sent between SSPs and SCPs are carried in 
TCAP messages. For example, an SSP sends a TCAP query to determine the routing 
number associated with a dialed 800/888 number and to check the personal identification 
number (PIN) of a calling card user. In mobile networks (IS-41 and GSM), TCAP carries 
Mobile Application Part (MAP) messages sent between mobile switches and databases to 


support user authentication, equipment identification, and roaming. 


Lastly, Operations, Maintenance and Administration Part (OMAP) is allocated for 
future definition. Presently, OMAP services may be used to verify network routing 


databases and to diagnose link problems. 


D. MTP LEVEL 2 
1E Types Of Signaling Units 


The role of MTP Level 2 [4] is to ensure accurate transmission of a message 
across a signaling link between two adjacent signaling points. To achieve this, MTP-2 
implements flow control, message sequence validation, and error checking. When an 
error occurs on a signaling link, the message (or set of messages) is retransmitted. There 
are three kinds of signal units: Fill-In Signal Units (FISUs), Link Status Signal Units 
(LSSUs), and Message Signal Units (MSUs) (Fig 2.4). Each type of signaling unit is used 
for a specific purpose; however, all of them have the basic level 2 fields as listed in able 


Zale 


Fill-In Signal Units are the simplest signaling units in that they only carry the 
basic level 2 fields. FISUs are transmitted continuously on a signaling link whenever 
there are no other signal units (MSUs or LSSUs) to be sent. There are two main reasons 
for doing so. First, it provides acknowledgment to signaling units received when there are 
no LSSUs or MSUs to send. Second, since a FISU carries all the necessary level 2 fields, 
a correct receipt of a FISU indicates good link quality and vice versa. Hence FISUs 


provide a fast and responsive means of detecting link failures. 
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The flag indicates the beginning and end of signal unit. It is simply a 8 bit 
binary constant with the value 0111 1110. Before transmitting a signal unit, 
MTP Level 2 removes "false flags" by adding a zero-bit after any sequence 
of five one-bits. Upon receiving a signal unit and stripping the flag, MTP 
Level 2 removes any zero-bit following a sequence of five one-bits to restore 
the original contents of the message. 

Backward Sequence | The BSN is used to acknowledge the receipt of signal units by the remote 

Number signaling point. The BSN contains the sequence number of the signal unit 

(BSN) being acknowledged. 

Backward Indicator | The BIB indicates a negative acknowledgement by the remote signaling 

Bit (BIB) point when toggled. 


Forward Sequence | The FSN contains the sequence number of the signal unit. 
Number (FSN) 

Forward Indicator Bit | The FIB is used in error recovery like the BIB. 

(FIB) 


Length Indicator This 6-bit field provides the length of the signaling unit after the LI field in 

(LI) octets. O for FISUs, 1 or 2 for LSSUs and 3 to 63 MSUs. The maximum 
length of a signal unit is 279 octets: 272 octets (data) + 1 octet (flag) + 1 
octet (BSN + BIB) + 1 octet (FSN + FIB) + 1 octet (LI + 2 bits spare) + 1 
octet (SIO) + 2 octets (CRC). 





Table 2.1 Basic MTP Level 2 Fields 


1] 


Link Status Signal Units carry one or two octets of link status information. The 


link status is used to control link alignment and to indicate the status of a signaling point 


(e.g., local processor outage) to the adjacent remote signaling point. The states of the link 


are defined in Table 2.2. 


Link status: “Out of Alignment” 
Link status: “Normal Alignment” 


Link status: “Out of Service” 
Link status: “Emergency Alignment” 





Link status: “Processor Outage” 


Table 2.2 Link Status 


Message Signal Units are the main signaling information carriers. Signaling 


information of varying length from the upper user layers are carried in the Signaling 


Information Field (SIF). The type and structure of the information carried is usually 


differentiated by the Service Information Octet (SIO), which in turn is formed by a 4 bit 
Sub-Service Field (SSF) and a 4 bit Service Indicator (SI). The Service Indicator 


specifies the MTP user (Table 2.3), thereby allowing the decoding of the information 


poaaed in the SIF. 


SI Value MTP User 


0 
2 
3 
4 
P) 
6 
7 
8 
9 


Signaling Network Management Message (SNM) 
Signaling Network Tesing and Maintenance Messages 
Spare 

Signaling Connection Control Part (SCCP) 

Telephone User Part (TUP) 

ISDN User Part (ISUP) 

Data User Part (call and circuit-related messages) 
Data User Part (facility registration/cancellation messages) 
Reserved for MTP Testing User Part 

Broadband ISDN User Part 

Satellite ISDN User Part 

Spare 


Table 2.3 Service Indicator Values 





Besides, the SIF in an MSU usually starts with a routing label, which contains the 


source and destination address of the MSU. This label is used by STPs to determine the 


path through which the MSU is to be routed. LSSUs and FISUs contain neither a routing 


label nor an SIO as they are only sent between two adjacent signaling points. For more 


information about routing labels, refer to Section E for the description on MTP Level 3. 
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De The MTP Level 2 Functions 


ITU-T Q.703 describes the function and procedures relating to the transfer of 


signaling information over one signaling link. These functions include: 
e Signal Unit Delimitation 
e Signal Unit Alignment 
e Error Detection 
e Error Correction 
e Initial Alignment 
e Signaling Link Error Monitoring 
e Flow Control 


As specified by Q.703, the functional blocks and their interaction, which make up 
the MTP level 2, are depicted in Fig. 2.4. The Link State Control (LSC) block together 
with the Initial Alignment Control (LAC) controls the overall state and mode of operation 
of the link including the initial alignment. The Transmission Control and Reception 
Control blocks take care of the transmission of signaling units (LISU, MSU or FISUs) 
across the link. The Delimitation, Alignment and Error Detection blocks take care of 
inserting flags before transmission and checking on the accuracy of the received signaling 
units by means of CRC and octet counting. The correct or incorrect receipt of a signaling 
unit are also fed into error rate monitors (AERM and SUERM) which count such 
Statistics and decide whether the link should be operational or not. In addition, Q.703 also 
specified the Congestion Control and the Processor Outage Control block, which 
recommend, respectively, the procedures to be executed at the occurrence of congestion 
and processor outage in the higher layers. More on these is covered in the subsequent 


sections. 


13 


Outgoing MSU 
TX Control 
2 (TXC) 
Initial 
Link State Alignment 
Control Control 
(LSC) (IAC) 


Processor 
Outage 
Control 

(POC) 


Congestion 
Control 


Reception 
(CC) 


Control 
(RC) 


t 
1 
1 
1 
| 
) 
| 
| 
J 
| 
| 
| 
| 
l 
! 
! 
! 
! 
! 
! 
! 
! 
! 
I 
! 
! 
! 
! 
! 
! 
I 
! 
+ 


Incoming MSU 
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Fig 2.5 Functional Block Diagram of MTP Level 2 





3. Error Detection with Flags, Zero Insertion and CRC Checks 


An 8-bit Flag (‘01111110’) is added in front of every signaling unit before any 
transmission into the data link by DAEDT. DAEDT also does computation of the CRC 
field and zero insertion between the 5" and 6" bit of any continuous sequence with 6 ‘1’s. 
The CRC value is generated using all the bits of the signaling unit except the Flag and it 
is based on the standard CCITT 16 bit CRC code. 


At the remote end of the link, DAEDR checks the received SU by comparing its 
computed CRC with what that is received, strips off any flags, removes any inserted 
zeros, counts the length of signaling unit and sends it to the RC for further processing if it 
is all correct. Otherwise DAEDR will update the error rate monitors when it detects an 


error. 
4. Error Correction with Go Back-N Retransmission Algorithm 


SS7 employs a popular Go Back-N method to retransmit signal units that are 
erroneously received. When a signal unit is ready for transmission, the signaling point 
increments the FSN (forward sequence number) by | (FSN = 0..127). The CRC (cyclic 


redundancy check) checksum value is calculated and appended to the forward message. 
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Upon receiving the message, the remote signaling point checks the CRC and copies the 
value of the FSN into the BSN of the next available message scheduled for transmission 
back to the initiating signaling point. If the CRC is correct, the backward message is 
transmitted. If the CRC is incorrect, the remote signaling point indicates negative 
acknowledgment by toggling the BIB prior to sending the backward message. When the 
originating signaling point receives a negative acknowledgment, it retransmits all forward 
messages, beginning with the corrupted message, with the FIB toggled. Fig 2.5 provides 
an illustration of the method with SSP-A trying to send to SSP-B MSUs numbered from 
5 to 9. MSU 8 is in error. 


new MSU, FSN=5, FIB =0 

new MSU, FSN =6, FIB =0 

new MSU, FSN =7, FIB =0 

FISU, BSN =6, BIB =0 
(+ve ACK) 


MSUs up to 6 in RTB cleared 


new MSU, FSN = 8, FIB =0 
new MSU, FSN =9, FIB =0 3 


FISU, BSN = 7, BIB = 1 
MSU 7 in RTB cleared (-ve ACK) 
MSU from RTB, FSN = 8, FIB = 1 


MSU from RTB, FSN = 9, FIB = 1 





Fig 2.6 Use of Sequence Numbers and Indicator Bits in SS7 


Because the 7-bit FSN can store values between zero and 127, a signaling point 
can send up to 128 signal units before requiring acknowledgment from the remote 
signaling point. The BSN indicates the last in-sequence signal unit received correctly by 
the remote signaling point. The BSN acknowledges all previously received signal units as 
well. For example, if SSP-A receives a signal unit with BSN = 3 followed by another 
with BSN = 6 (and the BIB is not toggled), it implies successful receipt of signal units 3 


through 6 as well. It should also be noted that sequence numbers are used to identify 


ie 


MSUs only. Sequence numbers are incremented when new MSUs are transmitted but 


kept at the previous value when LISUs and FISUs are transmitted. 
5. Transmission (TXC) and Reception Control (RC) 


As explained, SS7 uses the Go Back-N algorithm as the foundation to define two 
different types of transmission/reception methods to correct any transmission errors. For 
non-intercontinental or non-satellite links with one way propagation delay less than 15 
ms, the Basic Transmission/Reception method is recommended, else the Preventive 
Cyclic Retransmission (PCR) method is recommended. Both methods keep a copy of the 
last transmitted MSU in a Retransmission Buffer (RTB) and only those MSUs that have 
been positively acknowledged are cleared (the Go-Back-N algorithm). However 
retransmission of the MSUs is executed whenever there is a negative acknowledgement 
in the Basic method but cyclically retransmitted over the link whenever there isn’t any 


new MSUs or LISUs to send in the latter. 


The basic functions of the Transmission Control block as outlined by Q.703 are as 


follows: 
e Receive link status from LSC and IAC 
e Receive and queue up new MSUs from MTP level 3 
e Receive transmission inhibit/un-inhibit commands for MSUs and LISUs 


e Receive BSN and BIB values from MSU received by RC and compare them 
with own FSN and FIB. Clear positively acknowledged MSUs or retransmit 


negative acknowledged MSUs 


e Transmit signaling units based on the order listed in Table 2.4 with BSN and 
BIB fields set to represent positive or negative acknowledgement for MSUs 


received by RC 


e Operate Timers T6 and T7 and declare link failure if they are expired 


Type of Signaling Unit 
Any LISUs unless it is inhibited 


Any MSU required for retransmission 
(Depending whether it is using Basic or PCR error correction method) 


New MSUs unless it is inhibited or the Retransmission Buffer is full 
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(A full retransmission buffer means transmission of new MSU is not 
possible since a copy cannot be added into the buffer) 


FISUs 


Table 2.4 Signaling Unit Transmission Order 


Timer [Description 


The time by which the link has to be in service after alignment if 
ready. 

The time by which the link has to be aligned ready after start of 
alignment. 

The time by which the link has to be able to enter proving after link is 
aligned. 
transmitted during a local congestion. 
link failure is declared. 

ACK declared. 


Table 2.5 MTP Level 2 Timers 


















The basic functions of the Reception Control block as outlined by Q.703 are as 


follows: 
e Receive MSU/FISU Accept and Reject commands from LSC. 


e Receive and process of signaling units from remote SP. Update LSC, IAC and 
TXC on link status from LISUs. Check for validity of BSN and BIB fields and 
update TXC. Forward any accepted MSUs to MTP Level 3. 


e Check the FSN and FIB fields to determine type of acknowledgement TXC 
should transmit. Out of sequence numbering for FSN indicates a negative 


acknowledgment. 


6. Error Rate Monitoring 


Error rate monitoring is used by SS7 to monitor the “health” of a signaling link. It 
is performed both when the link is in service and during the link’s proving period at 
startup. The Signal Unit Error Rate Monitor (SUERM) performs the in-service 
monitoring, while the Alignment Error Rate Monitor (AERM) is employed during 
proving. Fig 2.7 illustrates the use of error counting procedure performed by both 


functions. 
7 


AERM receives indication from IAC the period within which it is to monitor the 
error rate. When started, AERM simply counts the number of error SUs. If the counter 
C,, reaches the value Tj, the link is declare to have failed the proving period. The value of 
T; varies from Tj, to Tj. when the link is in normal alignment mode and emergency 


alignment mode respectively. Recommended values for T; values are listed in Table 2.6. 


Set T;to T. Start 
IAC ->AERM LSC->SUERM 


Stop SU in Gror 
IAC->AERM DAEDR->AERM 


Cs= Cs+1 
Set 7; to T, Nsu = Neu + 1 


No 


Yes 


Abort Proving Monitoring 
AERM > IAC 


LJ Command Received 
Ez In Service 
Command Sent 


Fig 2.7 Functional Procedure of AERM and SUERM 





SUERM on the other hand, operates slightly differently. AERM ensures that the 


link operates with a low level of error during the short proving period to determine 
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successful link startup and initiate MSU transmission operation. SUERM, on the other 
hand is designed to continuously check the “health” of the link when it is in operation. As 
such, besides counting error SUs, the monitor also gives credit for correctly received 
data. The monitor has a similar counter C,, which counts the number of error SU received 
and will declare link failure if the limit T is reached. However the counter can be 
decremented (credited) by 1, for every 256 SU received (error or not). Recommended 


values of T are also listed in Table 2.6. 


Tin =4 < 64 kbps 64 < 64 kps 
Tie = 1 < 64 kbps 


Table 2.6 Recommended Parameters for AERM and SUERM 






Vs Overall Link State Control and Initial Alignment 


The overall mode of operation of MTP-2 1s managed by the LSC. Prior to normal 
operation, the link needs to execute an initial alignment procedure, which is managed and 
controlled by the IAC. Upon power on, which is usually instructed by a higher level, the 
TXC will be controlled by the LSC to send SIOS continuously. Another link startup 
message would then activate the LSC and IAC to starts its alignment procedure. The 
TXC is directed to send SIOs and until it is reciprocated by the adjacent level and 
received by RC. At this point, the link is considered aligned and the TXC is directed to 
switch to sending SINs. However to ensure that it is stable for operation, four (4) proving 
cycles (usually T4 is 7.5 - 9.5 seconds for each cycle) are recommended to check for 
excessive error. During which the TXC will send only FISUs. Upon expiration, if AERM 
did not determine any excessive errors, the link will then be operational and the TXC will 
start transmitting any MSUs stored in its buffer. Table 2.7 illustrates this sequence of 


events. 





orate of Functional Block 


ac TXC_ | RC__C| AERM_| SUERM 


a Power Off xin ane Idle 
Se /PowerOn = =——....———sSY In 

TXC sends SIOS alias PY ci Service 
== 

TXC sends SIO ee Ve ee re aie ee 

a de Aligned Aligned 

SIO received by RC and TXC sends SIN 

Proving Period x 4 cycles ae i, 

SIN received ee RC 


--. ——aah enment Comp plete nee - In Service 
and ee sends FISUs onl 

/InService ——— «W«s«(J Service 

FISU receives by RC and TXC sends MSUs 

if an 


Table 2.7 MTP Level 2 Link Startup Procedure 





Sequence of Events controlled by LSC 



















E. MTP LEVEL 3 
1. The MTP Level 3 Functions 


The main role of MTP Level 3 [5] is to provide message routing between 
signaling points in the SS7 network and ensure a high availability of signaling routes. It 1s 
divided into two main functional blocks, the Signaling Message Handling (SMH) 


function and Signaling Network Management (SNM) function as shown in Fig 2.8. 


Each MTP-2 module only takes care of transmitting/receiving MSUs for one link. 
As signaling points have more than one link, MTP-3 is necessary to manage the 
distribution of messages between links and its local users. In a complex network, MTP-3 
also has to efficiently perform routing of messages across available links, towards the 
destination. These functions are taken care by the SMH block. MSUs from users are 
routed by the Routing sub-block into MTP-2 links. On the other hand, MSUs received 


from links are checked by the Discrimination sub-block. If they are destined for a local 
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user, they will be distributed to the respective user layer. Otherwise they will be sent to 


the Routing function for forwarding to the next signaling point. 


Signaling Message Handling (SMH) 


Signaling 
Traffic 
Management 


Signaling Signaling 
Route Link 
Management Management 





Fig 2.8 Functional Block Diagram of MTP Level 3 


The provision of Signaling Network Management functions is another example of 
achieving high availability and reliability in SS7. This group of functions can actually be 
classified as a SS7 user as they make use of message transfer services to transfer network 
management MSUs across the network. Within a signaling point, the Signaling Link 
Management sub-block communicates, controls and monitors the status of MTP level 2 
links connected. It provides the Traffic Management function, the overall controller, the 
“health” of all the connected links. This information is then conveyed to the Route 


Management function, which maintains the signaling points routing tables. 
As a whole, the basic network management objectives are: 


e Activation and deactivation of links to maintain a minimum operational 


network. 
e Monitor link and route status to update the Routing Table. 


e Reconfiguration of signaling network in case of failures and congestion to 


ensure minimum disruption to the network services. 
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jp Routing Labels 


Routing of messages by MTP Level 3 is based on the routing label in the 
Signaling Information Field (SIF). The routing label is comprised of the Destination 
Point Code (DPC), Originating Point Code (OPC), and Signaling Link Selection (SLS) 
fields. Point codes are numeric addresses which uniquely identify each signaling point in 
the SS7 network. When the DPC in a message matches the point code of the receiving 
signaling point, the message is distributed to the appropriate user part (e.g., ISUP or 
SCCP) indicated by the service indicator in the SIO. Messages destined for other 


signaling points are routed to an outgoing link based on the DPC and SLS values. 


An interesting point to note is that ANSI and ITU-T have different routing label 
formats as shown in Fig 2.9. ANSI point codes are 24-bits with a 5-bit SLS while ITU-T 
point codes typically use 14-bits and a 4-bit SLS field. For this reason, signaling 
information exchanged between ANSI and ITU-T networks must be routed through a 


gateway STP or protocol converter, which has both an ANSI and an ITU-T point code. 


ANSI SS? SIO and SIF 
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DPC Network : 
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Fig 2.9 ANSI vs. ITU-T SIO and SIF Format 
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An ANSI point code consists of network, cluster, and member octets (e.g., 245- 
16-0). ITU-T point codes are pure binary numbers, which may be stated in terms of zone, 
area/network, and signaling point identification numbers. For example, the point code 


5557 (decimal) may be stated as 2-182-5 (binary 010 10110110 101). 
5. Routing of Messages 


The selection of outgoing link is based on information in the DPC and SLS fields. 
The DPC is used to determine the possible outgoing linkset(s) and the SLS field is used 
to decide the outgoing link from the links among the possible linkset(s). As an example, 
if each linkset for a SSP (Fig 2.2) has two links, each SSP will have 4 equally possible 
outgoing links to reach the other SSP. If the SSPs operates using ITU-T 4-bit SLS format 
(giving 16 possible codes), each of the links will have 4 SLS values assigned. And in 
theory, if a user part sends messages at regular intervals and assigns the SLS values in a 
round-robin fashion (rotate from code 0 to 15 equally), the traffic level should be equal 
among all the links. In addition, this form of SLS routing also ensures that messages 
arrive with proper sequencing. Any two messages sent with the same SLS will always 


arrive at the destination in the same order in which they were originally sent. 


However, the use of SLS does pose a problem in that even load distribution is not 
achievable for all link configurations. With a 4 bit SLS, a configuration with 3 links in 
each of the two linksets (totaling 6 links) results in an uneven assignment of 3 SLS values 
for 4 links and 2 SLS values for the remaining 2 links. Similar problems are encountered 


in the ANSI recommendation. 
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II. OPNET MODELLING 


A. GENERAL CAPABILITIES OF OPNET 


OPNET is a suite of network simulation software developed by MIL3 Inc. It 
provides direct and easy modular implementation of communications network topologies. 
OPNET uses a hierarchical and object oriented approach towards network modeling. The 
most fundamental construction unit of a network in OPNET is a module. There are 
several types of modules as illustrated in Fig 3.1. Together, modules can be used to 
construct any network component such as a host computer, a router or hub, etc. The 
constructed network component is called a node in OPNET and it could then be used to 


construct any network or subnet as desired. 


As a result, a real world network or subnet is represented by a network of nodes 
with each node modeled after a host, router or other component in the network. Each type 
of node is in turn modeled based on the modules it consist of and the processes they 


execute. 


& module capable of executing a C Language process code 


Processor 


& Processor module with buffer(s) and queueing capabilities 


Queue 
> A module that transmits data packets into a link 


Transmitter 


[a= f& module that receives data packets from a link 


Receiver 





Fig 3.1 Main Types of OPNET Modules 


The use of OPNET in modeling the SS7 network will be discussed in the 
following sections. The major components of OPNET (version 6.0) used are tabulated in 


Table 3.1. 
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Software Module ' 


Project Editor Specify network topology and configure nodes and links. 
Choose results, run simulations, and view results. 

Node Editor Create models of nodes by specifying internal structure and 
capabilities. 


Process Editor Develop models of decision-making processes representing 
protocols, algorithms, resource managers, operating systems, etc. 


Link Editor Create, edit, and view link models. 


Table 3.1 Major OPNET Version 6.0 Components 








B. MODELLING SIGNALING POINTS AND NETWORKS USING OPNET 


With reference to the procedures and functions envisaged in ITU-T Q.7xx-Series 
Recommendation, the flow of MSUs within the Message Transfer Part could be 
represented with processor-buffer models. Consider a two link SSP with its model as 
shown in Fig 3.2. An OPNET model would comprised mainly of queue and processor 
modules. Logically, MTP-3 should have three queue modules, one for each function 
(routing, discrimination and distribution). Likewise each MTP-2 should have one queue 
(for TXC) and one processor module (for RC) for distinct functions. However this would 
make a SSP with multiple links very complex to model and make internal communication 
between functional blocks and between levels very complicated. Instead, a simpler 
approach would be to represent each level with just one queue module. There is no loss in 
simulation capability and our OPNET model would be smaller and more modular to 


construct. 


To illustrate the above, the OPNET model for the two link SSP is shown in Fig 
3.3. It includes a simple processor module to simulate a user part function that could be 
ISDN or Data user part etc. There are three queue modules, one to simulate MTP-3 and 
one for each MTP-2 function. The pairs of transmitter/receiver modules are necessary for 
OPNET to connect a processor/queue module to a link. A pair of these modules would 
represent one physical link. It can be seen that modular construction of SS7 signaling 


points with other protocol structures can be readily done in OPNET. 
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Fig 3.3 A 2 Link SSP with ISDN User Part 


As another example, a STP which manages 4 SS7 links would have a protocol 
structure as shown in Fig 3.4. In this case, no high-level user modules are modelled as 


STPs generally only serve as message transfer points. 


7a 


rx_link_2 


MTP 2_0 


tx_link_2 


rx_link_21 rx_link_3 
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Fig 3.4 A 4 Link STP 


So far, discussion is based on the model of a signaling point represented by a node 
in OPNET. To further illustrate the construction of a SS7 network using defined node 
models, a mesh network with 2 SSPs and 4 STPs that uses the node model as in Fig 3.3 


and 3.4 respectively is constructed in Fig 3.5. 





“Fig 3.5 A Typical 2 SSP SS7 Network 
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Having discussed the construction of the various types of signaling points and 
network nodes and modules, the following section shall discuss the specific modeling of 


the MTP processes within OPNET modules. 


CG; MODELING MTP PROCESSES USING OPNET 


OPNET allows discrete event modeling of processes. Typically, in simulating 
network protocols, one can just simulate the characteristics concerned and record 
Statistics about that. For example, if the concern is transmission delay, one can just 
simulate the data rate, packet length and protocol method in which the data packets are 
transmitted and then measure the delay. However this approach produces very specific 
and simple process models, which are restricted in use. A need for recording other 
Statistics would require the user to reconstruct the model all over again from top to 


bottom. 


As such in the modeling of SS7 processes, a concerted effort was made to model 
as many of the protocol characteristics as possible, not just in the behavior but also 
according to how a real system would work. This includes exact modeling of the 
functions performed by the protocol. The MTP layers, being the fundamental building 
blocks of any SS7 network, are selected as the prime processes. The ITU-T standards, 


being the reference standard of SS7, are used for reference and modeling. 


Of the three MTP layers, both Level 2 and 3 requires modeling. However the 
main work of this thesis is on the modeling of MTP-2. The modeling of MTP-3. ts 
conducted by Ow [6]. Although both levels are modeled separately, the modular 
approach in the design of the signaling points architecture in OPNET allows direct 
integration of the two levels, thereby providing a complete SS7 Message Transfer Layer 


ready for simulation. 
D. MODELING MTP LEVEL 2 PROCESS 


1. Model Overview 


The process model of MTP Level 2 is constructed based on ITU-T Q.7/03 


standard. This means the various functional blocks as depicted in Fig 2.5 have to be 


Dee, 


implemented. Fig 3.6 represents the OPNET model for this process with 14 states (the 
circular symbols). Most of the time, each state is directly assigned to implement one 
functional block, however, the states “TXC”, “TXC_rev” and TX_MSU” implement the 
combined functions of TXC and DAEDT, and the states “RC” and “RC_rcv” implements 
the combined functions of RC and DAEDR. The states “TXC” and “RC” handle only 
inter function communication requirements while the states ““TXC_rcv” and “RC_rcv” 
handle the receiving of MSUs from MTP-3 and MTP-1 respectively. The separate state 
“TX_MSU” is used to implement the transmission of signaling units onto the link (MTP- 
1) and also allow the incorporation of transmission time. The “init” state is used for 
initializing the state variables while the “idle” state is the default state the process would 
be in whenever it has completed its task in the other states. Lastly the “ext_msg” state is 


used to handle inter function messages arriving from other SS7 layers. 


When an OPNET simulation is executed, the “init” state will be executed and then 
the process will stay “idle” until an event such as arrival of a MSU or a inter-function 
message. For example if a link startup message from MTP-3 for LSC is sent to the level, 
‘“ext_msg” would be executed to pass the message to “LSC”. “LSC” upon receiving the 
message would then execute its link startup procedures, which includes sending messages 
to “IAC” and “TXC” and so on. Thus a continuous chain of events is constantly 


happening in the process simulating the working of a typical SS7 layer. 
yd Buffers and Processor Delay 


Each OPNET queue module comes with a processor and facility to define the 
number of buffers associated with the processor. For MTP Level 2, the main buffers 
would be the MSU transmission and Retransmission buffer. However based on Q.703 
specifications, a practical implementation of the protocol would also require buffers for 
the inter-function messages and commands. In fact, every functional block should have 
its own message buffer (Table 3.2) from which it could extract a message intended for 
itself and then act on it. Such a mechanism would also allow incorporation of processor 
delay (the message service time) into the model. In our OPNET model, inter-function 
message processing for each function 1s assumed to have a constant service rate. The 


service rate of MSUs from the transmission and retransmission buffer is based on its 
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packet length and link data rate. All buffers are also designed to have infinite size since 
generic Q.703 does not incorporate any procedure for handling buffer overflow. Of 
course, in the practical world this is not possible, nevertheless most simulation analyses 
assume a large buffer in the system. And in the event buffer overflow conditions are to be 
studied, redefinition of the buffer size and incorporation of an overflow handling 


procedure can still be done in OPNET readily. 
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Fig 3.6 Process Model of MTP Level 2 


Transmission buffer Data rate and MSU length dependent 
Retransmission buffer 


LSC internal message buffer Constant 

IAC internal message buffer (can be defined prior simulation ) 
POC internal message buffer 
TXC internal message buffer 
RC internal message buffer 
AERM internal message buffer 
SUERM internal message buffer 
CC internal message buffer 


Table 3.2 MTP Level 2 buffers 
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E. MODELLING OF MESSAGE TRANSFER PART LEVEL 3 


As mentioned, the modeling of MTP Level 3 using OPNET is performed by Ow 
[6]. The approach is similar to that for MTP Level 2. The whole layer is implemented 
using one OPNET queue module. The functional blocks of the protocol are implemented 
as processing states in OPNET and buffers are allocated for storing MSUs and inter- 


function messages. Further elaboration of the model is discussed in the reference. 
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IV. LINKSET DELAY USING QUEUE MODELING 


A. INTRODUCTION 


This chapter outlines the mathematical derivations of the Average Linkset delay 
established by Wong [7] using Markov theory. The predictions obtained are then 
compared with a simulation run using the constructed OPNET Model from the previous 


chapter. 


B. LOAD DISTRIBUTION IN A LINKSET 


The SS7 protocol uses the SLS code for the purpose of load sharing. The 
originating user of an MSU generates a SLS code and the MTP layers determine on 
which link the MSU should be sent. The SLS codes are assumed to be generated in a 
round robin fashion by the user layer. The routing table at a signaling point includes all 
the possible links that could be used to reach the destination. For each possible link, an 
SLS code is assigned. MSUs arriving at the Signaling Point are then sent via the link that 


matches the assigned SLS code. 


As explained in Chapter I, Section E.2, load sharing is equal for all links only if 
the number of possible links is a power of 2 (1.e., 2, 4, 8 etc). For example if we have 5 
possible links, with a 4 bit SLS (.e., NW = 16 SLS codes), 4 of the links will have 3 SLS 
codes assigned while the 5" link will have 4. Thus more traffic will flow into the 5" link 
if SLS codes are uniformly generated. In general, if there are K possible iinks for a 
destination, and /,5 is the total traffic load in MSUs per sec, there will be ny links with 


traffic Ay and n; link with traffic 4,. 


K if mod(N, K)=0 
Ny = (1) 
mod(N, K) otherwise 
n, =(kaei 7 (Z) 
| 
A, ee, (3) 


Ca) 


0 uf mod(N, K)=0 
ie Fae (4) 


otherwise 





Table 4.1 ny, nz, Ay and A, for 4 bit SLS 


e LINK SET DELAY MODELLING 
1. The M/G/1 Queuing Model 


Wong [7] modeled each link in a linkset as a single stage M/G/1 queue as shown 
in Fig 4.1. The traffic load in each link will be equal to either Ay or A, as derived in Eqn. 
(3) and (4) respectively. This means that the arrival process, 1.e., the arrival of MSUs to 
the MTP layers, 1s Poisson and each link ts processed by a single server with a General 


distribution in service time. 


Linkset 


Layers 





Fig 4.1 Single Stage Queuing Model for Link Set 
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2: General Distribution for Service Time 


The distribution of the MSU service time depends on the link capacity (a 
constant) and the message length distribution. Let x be a random variable denoting the 
message length in bits with x being the average and C, the coefficient of variation as 
defined in Eqn. (5) and (6). Symbol p,, represents the probability of having a MSU with 


length x;,. 


c— peer (3) 


Xx 


x 


The values of C, are between O and 1. If C, = 1, the message length is 
exponentially distributed, and since link capacity is constant, the service time 7, will also 
exponential and we would have a M/M/1 queue. 

If we let the link capacity be C bits/s, using Pollaczek-KhinChin formula [8] the 


average service time (i.e. the waiting time to be served), T. is defined as in Eqn. (7). 


x 
= Aare ma “CG? 


l= (7) 
C 
We can also determine the link utilization 9. 
po =—LinkItaffic __7"* (8) 


Link Capacity C 


Further substitution of C, and p into Eqn. (7) and (8) respectively yields the 


following equations. 


omens (9) 
ZO (HA) 

— x-p-(l+C?) 

ae 2-C-(1-p) 
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3. Average Link Delay Estimation 


For a SS7 link, the average link delay 7g is the sum of the transmission time 7;, 


the service time 7; and the propagation time 7,. The propagation T, varies and it depends 
on the path length L and the speed v of the medium 


T, =T, +T, ap di, 


(11) 
Y Y - . 2 

p oF pll+cr) L (eZ) 
C 2-C-(l-p) v 


4. Average Linkset Delay Estimation 


After knowing the average delay in a link, we are now ready to determine the 
average delay in a link set. Assuming that there are K links in the link set, then the traffic 
load in each link shall be A;, where i =/...K. Therefore using Little’s Formula [8], we 


can determine the average number of MSUs, N and average delay, Tzs for the link set. 
K 


Naa. =n, -Ay -T, +n, -A,-T, 


(13) 
t= 
jie oR (14) 
ya : 


i=} 


Where Ty and 7; can be obtained by direct substitution of the constants Ay and A, 
respectively into Eqn. (12) to yield Eqn. (15). 


z An x, Be ee Ga ie r 
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A plot of the Average Linkset delay T,s (normalized to the sum of T, and T,) 


against various Total Linkset Traffic Intensity Az5, is provided in Fig 4.2. 
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Fig 4.2 Queuing Theory Prediction of Link Set Delay (for 4 bit SLS) 
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V. SIMULATION RESULTS AND COMPARSION 


A. SCOPE OF SIMULATION 


In this chapter, the simulation of a simple two SSP network will be discussed. The 
focus of the simulation will be to determine the average linkset delay in the network and 


compare it with the analysis provided in Chapter IV. 


B. SIMULATION NETWORK CONFIGURATION 


The SS7 network used for the simulation is comprised of two SSPs 
communicating between each other using two 56 kbps links. The network structure is as 
shown in Fig 5.1 and the internal structure of the SSP node is similar to that described in 


elesG eer 





Fig 5.1 2 SSP Network Used for Simulation 


In the simulation, MSUs with exponentially distributed length, are transmitted 
into the message transfer layer at an exponentially distributed time interval. This 
constitutes a Poisson arrival with exponentially distributed service time. The SLS field in 
the MSUs is also assigned in a round robin fashion such that both links have about the 
same load. For every MSU, the duration between the transmission and reception by the 
user part in the other SSP is recorded. These records are then used to determine the 


average Linkset Delay. 


An important point to note is that, the average Linkset Delay equations derived in 
Chapter IV are based on a single stage M/G/1 queue, whereas the proposed simulation 
model consists of several queuing stages as shown in Fig 3.2. Further, the mathematical 
model only represents the transmission process in MTP Level 2 but not the routing 
process in MTP Level 3. The Linkset Delay obtained from the simulation would render 


oh 


model inadequate, if delay in MTP Level 3 is significant or if it exhibits different 
characteristics. Consequently, two simulation runs were executed. The first was 
performed with the processing time in the MTP level 3 reduced to a very small value 
such that it is insignificant in the simulation. The second, on the other hand allows the 
processing time in the MTP level 3 to be of the same order as in MTP Level 2. The 


parameters used are summarized as follows: 


- Two bi-directional Links between two SSP, K = 2 
- Data rate per link, C= 56 kbps 
- Total data rate, 2C = 112 kbps 


MSU Length - Exponentially distributed 
- Average Length, x = 33 bytes 


Traffic Load - Exponential inter-arrival 
- Average time interval varies from 0.0024 to 0.05 sec 
( This generates on average: 
417 MSU/s to 20 MSU/s or 
110 kbps to 5.28 kbps or 
98.2% to 4.7% ) 


SES - 4 bit SLS (16 SLS codes, 8 for each link) 
- Assigned 1n round robin fashion 


Propagation - Path length, LZ = 1000 km 
- Link speed, v = 2x10° m/s 
MTP-3 Service - Constant 
Rate - 0.1 ms or 10,000 MSU/s used for s1mulation one 
- 1,2, 3 and 4 ms or 1000, 500, 333 and 250 MSU/s 
used for simulation two 


Min. Delay Saee B 
pee ITS 
C ov 


Table 5.1 Simulation Parameters 





Oe LINKSET DELAY COMPARISON 


The Average Linkset Delay obtained from the first simulation is plotted against 
the mathematical predictions (with K = 2) in Fig. 5.2. Traffic loads are normalized to the 
data rate of one link, i.e. 56 kbps. The plot only shows the simulation data obtained with 
the service rate for MTP Level 3 processors set at 0.1 ms. This value is chosen such that 
the MTP-3 layer is insignificant compared to the overall minimum possible delay of 7.2 


ms. This allows us to compare our OPNET model for MTP-2 with the single stage M/G/] 
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queuing model. The simulation results show that the two models are quite similar 
yielding only slight differences. The simulation generates a slightly larger delay for all 
traffic loads. This can be explained by the fact that the theoretical model assumes no 
processor delay in MTP-3. In reality, an outgoing MSU would have to pass the routing 
function of MTP-3 prior passing through the MTP-2 layer and onto the link. At the 
receiving end, the MSU has to be processed by the Discrimination function and 
Distribution Function of MTP-3 too. All of this additional processing adds to the overall 


delay. 
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Fig 5.2 Average Link Delay Comparison Between Simulation and Estimation 


Subsequently, the MTP-3 processors’ service rate is increased to more significant 
values at 1 , 2, 3 and 4 ms. The average linkset delay obtained from simulation at these 
rates are plotted in Fig 5.3. It can be observed that there is not much difference in the 


average linkset delay when MTP-3 service rate is either 0.1, 1 or 2 ms. However the 
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delay characteristic changes completely and increases significantly when MTP-3 service 
rates are at 3 and 4 ms. The increase is also more significant at the slower 4 ms rate than 
the 3 ms rate. A check on the MTP-3’s queuing delay reveals that there is congestion in 
the routing function at the 3 and 4 ms rates but not the earlier. The other functions of 
MTP-3, the Discrimination Function and Distribution Function, do not contribute much 


delay. 


At a total linkset capacity of 112 kbps, the highest possible MSU generation rate 
for our data is 424.4 MSU/s (.e. on average one MSU per 2.36 ms interval). When the 
MTP-3 service rates are faster than this value, the effect on average linkset delay 
contributed by MTP-3 remains small and invariant since the routing function in the layer 
can still handle the arriving MSUs. Thus we observed that the average linkset delay is 
similar to the single stage M/G/1 model with service rates at 0.1, 1 and 2 ms. Fig. 5.4 and 
Fig 5.5 shows that MTP-3 can still serve its function effectively at close to maximum 
traffic load 417 MSU/s (or 1.96 normalized to 56 kbps). The overall delay is mostly 
contributed by MTP-2 as the MSUs stay much longer in the layer instead of MTP-3. 


However this is not the case at the slower service rates. At 3 and 4 ms, the MTP-3 
routing function could only handle traffic loads up to 1.57 and 1.18 respectively (i.e. 
MSU generation interval of 3 and 4 ms respectively). Beyond that, the average linkset 
delay becomes exponentially large. In other words, the linkset becomes MTP-3 layer 
limited instead of link data rate limited when traffic load exceeds what MTP-3 could 
handle. The linkset delay is not stable but instead, it increases linearly in time as more 
and more MSUs are queued but not served in the Routing Function. Fig 5.6 and Fig 5.7 
shows that the MSUs are increasingly stuck in the routing function’s buffer at a traffic 


load of 1.63 (i.e. average MSU generation interval of 2.9 ms). 


Thus, we can conclude that Wong’s [7] single stage model can only provide good 
predictions to average Linkset Delay if the processing delay in the MTP-3 layer is not 
significant compared to the traffic load. The service rate of the MTP-3 routing function 
must be higher than the average MSU generation rate. Otherwise the single stage model 
would not be adequate since it is not capable of predicting the accumulation of MSUs in 


the routing function observed using simulation. 
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Fig 5.3 Average Linset Delay at Various MTP-3 Service Interval 
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Fig 5.4 MTP-2 Link Congestion at Traffic Load of 1.96 


| ; 
os, 
| 1.0 
: 
| 0.8 
: | 
| 
| 
| : 
| | 








: MTP-3 Routing Function Delay at Traffic Load of 1.96 


Le 
Mi MTP-3 service rate @ 2 ms 
. WI MTP-3 service rate @ 1 ms 
&CS = MTP-3 service rate @ 0.1 ms 





| 
| 


0.008 


we gras 


0.007 


0.006 poo’ 


ewteee te a 


ae Se we Se ee ee 


arrival of 2.4 ms 


0.004 
Traffic Load = 1.96 
0.003 implies inter-MSU 
0.001 


ee ee ere - seingutomadad et nes mignen te dco getasret Cane rormmnrensneherh wchtreretetstn tuna WeUie nein ea tbn'ee | 


Boat TT i ee a] 
E Os 10s 20s 30s 40s 50s 


—_—_— ee eee 


Fig 5.5 MTP-3 Routing Function Delay with MTP-2 congested at Traffic Load of 1.96 
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Fig 5.7 MTP-2 Link delay with MTP-3 congested at Traffic Load of 1.63 
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VI. CONCLUDING REMARKS 


In this work, the common channel signaling standard Signaling System No. 7 is 
studied. The various layers in the protocol, especially the Message Transfer Part (MTP) 
Gi.e., ITU-T Q.703-704) are discussed. The two main protocols in these recommendations 
are MTP Level 2 and Level 3, which correspond to the datalink and network layer in the 
OSI model. Modeling of MTP-2 using the simulation tool OPNET is then performed 
while that of MTP-3 is referenced from Ow’s [6] work. The objective is to create 
simulation models that execute the functions and procedures of the layers as similar to the 
actual protocol as possible. Together the use of both layers to form SS7 signaling points 


and signaling networks is also discussed. 


Subsequently, the single stage M/G/1 queuing model proposed by Wong [7] for 
prediction of average Linkset Delay is presented. To illustrate and compare the prediction 
results against the simulation results, a two-SSP network with 2 signaling links using the 
OPNET model is constructed and average Linkset Delay is recorded. Results show that 
the simulation and mathematical prediction are similar when processor service rate for 
MTP level 3 is fast and not significant to the overall transmission time. Both illustrate an 
exponential increase in Average Linkset delay when the overall linkset traffic load 1s 


increased. 


However, the mathematical model that assumes no queuing effects in MTP-3 is 
not adequate when processor delay in this layer is significant. The simulation shows that 
this is a critical layer, especially in the routing function. An accumulation of the messages 
in the buffer of the Routing function can occur at high traffic loads and message units 
will experience an increasing delay. This shows the simple fact that, in the design of a 
signaling point especially that of a Signaling Transfer Point, which works as a router, 
processing in the Routing function has to be carefully studied. Otherwise, it will be a 


critical bottleneck in the signaling point leading to poor link utilization. 
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VII. APPENDIX: OPNET SOURCE CODE FOR MTP LEVEL 2 


—— a ae ae ee ee ee ec ce ee ee ee ce cc ce cw ee ee ee ee ee ee ee ee ee we we es ee 
—_—— a SS cS a ee eS ee ee a ee ee ee ee ee ee ee ee ee ee ec ee ee eee ee ee ee ee es ee ee 


HEADER 


Signaling System 7 (SS7), Message Transfer Part Level 2 (MTP2) 


TUT, 


Or 03) Jul “1996 


The definitions here are for these purpose 


ch) 
(2) 
(3) 
(4) 


cc cr ec ce ce ce cm mc wc ee ec cr re mcm rc ee ce cr cr cc ee ce ee cm ee ee ce ce ee wc ee es we we we we we we we 
—— ee ee ee ee ee ee ee ce ce ec ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee es ee 


General constants 

I/O Stream used for communication with External Modules 
Queuing buffers allocation and use 

Internal Message Codes 

Link and States of the Level 2 Functional Blocks 
Interrupt Codes and Interrupt Macros 

Data Types 

Function Prototypes 


define TRUE and FALSE */ 
#define TRUE aL 
#define FALSE 0 


/* define modular 128 */ 
#define MOD_SN 128 


/* define signaling point types */ 


#define SP 


0 


#define STP al 


/* define type of Signaling Units */ 
#define FISU 0 
#define LSSU il 
#define MSU 2 


/* define simulation log file limit for link startup */ 
#define SYS_LINK_STARTUP_LOG_LIMIT 1000 


Y dorss 
i= 
/* 


cc cr cr cr ce em cc ce cw ee ee ee ee ss ee es ee ee es es ee ee ee ee i ee oe 
EE EE Le  _ _L L_ __ L___ _  __ —_____, 


em cm rm me ce ce ce ee cm me ce cre ee ee ce cc ce ce cc ce ce ee ce ec ec we we ee ee ee ee we we ee we we we we we we we we ws ee ew we we we ow 
a  _. _,_.._..................._..____ | ee 


/* define MTP2 Input/output streams */ 


#define 
#define 
#define 
#define 


/* 
iiss 
U5 
yet 
frat 
tl 
jis 


ec cr cre cre cr ee ee ec ec cc ce cc cc ee em ec ee cr ce ee ee ce ee ee ee ee ee ee ee ee ee ee ee oe a 
ec sce cc cr re cece ere ee ccc cr crc cr cr cr ce cre cr cr cr cr cr cr cr cr cr ce cr cr cc ee cr cr cr ce ce ce ee ee ee ee ee 


STREAM MTP2_LOW_LEVEL_OUT 0 
STREAM MTP2_LOW_LEVEL_IN 0 
STREAM _MTP2_HIGH_LEVEL_OUT 1 
STREAM _MTP2_ HIGH _LEVEL_IN ul 


(3) Queuing buffers allocation and use 
Note: The buffer numbers used are the OPNET "Queue" module’s sub 


-queue number. The Transfer buffer is for queuing out- 
going signaling units, while the Retransmission buffer 
stores every sent unit till an ackowledegment of receipt 
has been recieved. Other buffers are for queuing internal 
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ay, 
oy 
oy, 
ott 
aes 
aa 
7 
oh 
hy / 
se! 
ars 
a 
wee 


oh 
a 


ads 
sg 
zi 
ies: 
rh 
ists 


#define 
#define 
#define 
#define 
#define 
#define 
#define 
#define 


messages for each of the level 2 functional blocks. 


TRANSFER_BUFFER 


RETRANSMISSION_BUFFER 


NO_BUFFER 
LSC_BUFFER 
IAC_BUFFER 
POC_BUFFER 
TXC_BUFFER 
RC_BUFFER 


#define AERM BUFFER 
#define SUERM_BUFFER 
#define CC_BUFFER 


FW DANINHNAUM FP WNEF O 


© 


/* define size of SS7 packet fields */ 


#define FD_LEN_FLAG 8 /* size of header and trailer Flag ay 
#define FD_LEN_BSN 7 $(/* size of Backward Sequence Number */ 
#define FD_LEN_BIB 1 /* size of Backward Indicator Bit ey 
#define FD_LEN_FSN 7 %(/* size of Forward Sequence Number arf 
#define FD_LEN_FIB 1 /* size of Forward Indicator Bit ss 
#define FD_LEN_LI 8 /* size of Length Indicator (6 used) */ 
#define FD_LEN_CK 16 /* size of check bits ef 
#define FD_LEN_PDU -1 /* size of PDU set to -1 for encap ai 
#define FD_LEN_SF 8 /* size of Status Field wes 
#define FD_LEN_SIO 8 /* size of Service Information Octet */ 
#define FD_LEN_SI 4 /* size of Service Indicator wa 
#define FD_LEN_SSF 4 /* size of Sub-Service Field ae: 
#define FD_LEN_DPC 14 /* size of Destination Point Code ae 
#define FD_LEN_OPC 14 /* size of originating Point Code ye 
#define FD_LEN_SLS 4 /* size of signaling link selection */ 
#define FD_LEN_HOH1 8 /* size of HOH1 field he 
#define FD_LEN_SPARE2 2 /* size of spare field with 2 bits ny, 
#define FD_LEN_ LABEL 32 /* size of a standard label lab 
#define FD_LEN_PC 14 /* size of a point code i 


#define FLAG 126 


/* define field index for use in OPNET */ 
#define FD_INDEX_1ST 
#define FD_INDEX_2ND 
#define FD_INDEX_3RD 
#define FD_INDEX_4TH 
#define FD_INDEX_5TH 
#define FD_INDEX_6TH 
#define FD_INDEX_7TH 
#define FD_INDEX_8TH 
#define FD_INDEX_9TH 


womMrA NU PWD bP 


/* define the number of overhead bits for a standard Signal Unit (SU) */ 
/* BSN + BIB + FSN + FIB + LI + CK + 2 flags ky 
f= 7 + J + F + DT + 8 + 16 4 16°= 56 a 
#define SU_OVERHEAD 56 


/* definition of SS7 MTP level 2 internal messages for LSC */ 


#define MSG_IAC_LSC_ALIGNMENT_COMPLETE 21 oe 
#define MSG_IAC_LSC_ALIGNMENT_NOT_POSSIBLE 1102 
#define MSG_TXC_LSC_LINK_FAILURE Os 
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#define MSG_RC_LSC_SIO 1104 


#define MSG_RC_LSC_SIN L205 
#define MSG_RC_LSC_SIE 1106 
#define MSG_RC_LSC_SIOS 1107 
#define MSG_RC_LSC_SIPO 1108 
#define MSG_RC_LSC_FISU_MSU_RECEIVED TO? 
#define MSG_RC_LSC_LINK_FAILURE CLO 
#define MSG_SUERM_LSC_LINK_FAILURE ies eae 
#define MSG_POC_LSC_NO_PRO_OUTAGE i212 


/* definition of SS7 MTP level 2 internal messages for IAC */ 


#define MSG_LSC_IAC_START 1201 
#define MSG_LSC_IAC_ STOP 1202 
#define MSG_LSC_IAC_ EMERGENCY 1203 
#define MSG _RC_IAC_SIO 1204 
#define MSG _RC_IAC_SIN 1205 
#define MSG_RC_IAC SIE 1206 
#define MSG_RC_IAC_SIOS 12.07 
#define MSG_AERM_IAC_ABORT_PROVING P20 
#define MSG _DAEDR_IAC_CORRECT_SU 1209 


/* definition of SS7 MTP level 2 internal messages for POC */ 


#define MSG_LSC_POC_LOCAL_PRO_OUTAGE on 
#define MSG_LSC_POC_LOCAL_PRO_RECOVERED 1362 
#define MSG_LSC_POC_REMOTE_PRO OUTAGE 1363 
#define MSG LSC_POC_REMOTE_PRO_RECOVERED 1304 
#define MSG_LSC_POC_STOP 13105 


/* definition of SS7 MTP level 2 internal messages for TXC */ 


#define MSG _LSC_TXC_START 1401 
#define MSG _LSC_TXC_SEND_SIOS 102 
#define MSG_LSC_TXC_SEND_SIPO i203 
#define MSG _IAC TXC_SEND_SIO 1404 
#define MSG_IAC_TXC_SEND_SIN 1405 
#define MSG_IAC_TXC_SEND_SIE 1406 
#define MSG_CC_TXC_SEND_SIB 1407 
#define MSG_LSC_TXC_SEND_FISU 1408 
#define MSG_LSC_TXC_SEND_MSU 1409 
#define MSG _RC_TXC_SEND_NACK 1410 
#define MSG_RC_TXC_SIB_RECEIVED 1411 
#define MSG _RC_TXC_BSNR_AND_BIBR 1412 
#define MSG_RC_TXC_FSNX 1413 
#define MSG _LSC_TXC_RETRIEVAL_REQ FSNC 1414 
#define MSG_LSC_TXC_FLUSH_BUFFERS 1415 


/* definition of SS7 MTP level 2 internal messages for RC */ 


#define MSG_LSC_RC_START sy 6 Bik 
#define MSG _LSC_RC_STOP 1502 
#define MSG_LSC_RC_RETRIEVE_BSNT 1503 
#define MSG_LSC_RC_RETRIEVE_FSNX 1504 
#define MSG _ LSC_RC_REJECT_MSU_FISU i505 
#define MSG_LSC_RC_ACCEPT_MSU_FISU 1506 
#define MSG_TXC_RC_FSNT 1507 


/* definition of SS7 MTP level 2 internal messages for AERM */ 


#define MSG _LSC_AERM SET_Ti_To_Tin 1601 
#define MSG_IAC_AERM _SET_Ti_To_Tie 1602 
#define MSG_IAC_AERM_ START L608 
#define MSG_IAC_AERM_STOP 1604 
#define MSG _DAEDR_AERM _SU_ERROR 1605 
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/* definition of SS7 MTP level 2 internal messages for SUERM */ 


#define 
#define 
#define 
#define 


/* definition of SS7 MTP level 2 internal messages for CC */ 


#define 
#define 


/* definition of SS7 MTP messages between Level 


#define 
#define 
#define 
#define 
#define 
#define 
#define 
#define 


#define 
#define 


#define 
#define 
#define 
#define 


#define 
#define 
#define 


#define 
#define 


#define 
#define 
#define 
#define 


/ * ee ll 


MSG_LSCUSUERM_START 
MSG_LSC_SUERM_STOP 
MSG_DAEDR_SUERM_SU_ERROR 
MSG_DAEDR_SUERM_CORRECT_SU 


MSG_RC_CC_NORMAL 
MsGare]cc_BuSY 


MSG_LSAC_LSC_EMERGENCY 
MSG_LSAC_LSC_EMERGENCY_CEASES 
MSG_LSAC_LSC_STOP 
MSG_LSAC_LSC_START 
MSG_LSAC_LSC_FLUSH_BUFFERS 
MSG_LSAC_LSC_CONTINUE 
MSG_LSAC_LSC_LOCAL_PRO_OUTAGE 
MSG_LSAC_LSC_LOCAL_PRO_RECOVERED 


MSG_TCOC_LSC_RETRIEVE_BSNT 
MSG_TCOC_LSC_RETRIEVAL_REQ_FSNC 


MSG_MGMT_LSC_POWER_ON 
MSG_MGMT_LSC_LEVEL3_FAILURE 
MSG_MGMT_LSC_LOCAL_PRO_OUTAGE 
MSG_MGMT_LSC_LOCAL_PRO_RECOVERED 


MSG_XXX_RC_CONGESTION_DISCARD 
MSG_XXX_RC_CONGESTION_ACCEPT 
MSG_XXX_RC_NO_CONGESTION 


MSG_TXC_TCOC_RETRIEVAL_COMPLETE 
MSGlRC]TCOC = BSNT 


MSCG_LSC_LSAC_ INZSERV £CE 
MSG_LSC_LSAC_OUT_SERVICE 
MSG_LSC_LSAC_REMOTE_PRO_OUTAGE 
MSG_LSC_LSAC_REMOTE_PRO_RECOVERED 


JE 76ehil 
i OZ 
1703 
1704 


18CL 
1802 


8001 
8002 
80C3 
8004 
8005 
8006 
8007 
8008 


8011 
8012 


8021 
8022 
8023 
8024 


8141 
8142 
8143 


S154 
Sid2 


Stor 
8162 
S163 
8164 


/* (5) Link and States of the Level 2 Functional Blocks 


rh * tt ee eo 


/* define the link status */ 


/* states and values assigned are as per SS7 MTP2, 


#define 
#define 
#define 
#define 
#define 
#define 


LINK_STATUS_OUT_ALIGNMENT 0 
LINK_STATUS_NORMAL 
LINK_STATUS_EMERGENCY 
LINK_STATUS_OUT_SERVICE 
LINK_STATUS_PROCESSOR_OUTAGE 
LiNK STATUS BUSY 


il B® W DN +b 


/* define internal states for Txc */ 


#define 


/* states assigned are as per SS7, MTP2, 
STATE_TXC_IDLE 1 
STATE_TXC_IN SERVICE 2 


#define 


/* define internal states for LSC */ 


/* states assigned are as per SS7, MTP2, 
#define STATE_LSC_POWER_OFF 1 
#define STATE_LSC_ALIGNED_NOT_READY 2 


OE 


Ox sO S557 


ays 


Oo; 703 


2 and 3 EU@mctions */ 


ref 


#define STATE_LSC_ALIGNED_READY 3 

#define STATE_LSC_PROCESSOR_OUTAGE 4 

#define STATE_LSC_INITIAL_ALIGNMENT 5 

#define STATE_LSC_IN_SERVICE 6 

#define STATE_LSC_OUT_SERVICE 7 

/* define internal states for IAC */ 

/* states asSigned are as per SS7, MTP2, 90.703 */ 
#define STATE_IAC_IDLE 1 

#define STATE _IAC_ ALIGNED Z 

#define STATE_IAC_NOT_ALIGNED 3 

#define STATE_IAC_PROVING 4 

/* define internal states for RC */ 

/* states assigned are as per SS7, MTP2, 0.703 */ 
#define STATE_RC_IDLE 1 

#define STATE_RC_IN_SERVICE 2 

/* define internal states for AERM */ 

/* states assigned are as per SS7, MTP2, 9.703 */ 
#define STATE_AERM_IDLE Ji 

#define STATE_AERM_IN_SERVICE 2 

#define STATE_AERM_ MONITORING 3 

/* define internal states for SUERM */ 

/* states assigned are as per SS7, MTP2, 90.703 */ 
#define STATE_SUERM_IDLE ab 

#define STATE_SUERM_IN_SERVICE 2 

/* define internal states for CC */ 

/* states assigned are as per SS7, MTP2, 9.703 */ 
#define STATE_CC_IDLE dl 

#define STATE_CC_LEVEL2_CONGESTION 2 

/* define internal states for POC */ 

/* states assigned are as per SS7, MTP2, Q.703 */ 
#define STATE _POC_IDLE Al 

#define STATE_POC_LOCAL_PRO_OUTAGE 2 

#define STATE_POC_REMOTE_PRO_OUTAGE 3 

#define STATE_POC_BOTH_PRO_OUT 4 

ee SS a a ee a a ee a a ee ee ee 
/* (6) Interrupt Codes and Interrupt Macros 

i * Se ee SS SS = ee ee SS = SS SS S22 SS Le — a a a eS a a a oe Se So an: a 
/* definition of self interrupt codes */ 

#define LSC_MSG aL 

#define IAC_MSG 2 

#define POC_MSG 3 

#define TXC_MSG 4 

#define RC_MSG 5 

#define AERM_MSG 6 

#define SUERM_MSG oy 

#define CC_MSG 8 

#define TXC_TRANS_COMPLETE 9 

#define T1_EXPIRE 10 

#define T2_EXPIRE dls 3 

#define T3_EXPIRE Uy? 

#define T4_EXPIRE 3 

#define T5_EXPIRE 14 

#define T6_EXPIRE US" 

#define T7_EXPIRE 16 
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/* definition, of interrupts processed */ 


#define EXTERNAL_MSG (op_intrpt_type() == OPC_INTRPT_REMOTE) 

#define HIGH_ARRIVAL ((op_intrpt_type() == OPC_INTRPT_STRM) && 
(op_intrpt_strm() == STREAM_MTP2_HIGH_LEVEL_IN) ) 

#define LOW_ARRIVAL ((op_intrpt_type() == OPC_INTRPT_STRM) && 
(op_intrpt_strm() == STREAM_MTP2_LOW_LEVEL_IN) ) 

#define TX_MSU ((op_intrpt_type() == OPC_INTRPT_SELF) && 
(op_intrpt_code() == TXC_TRANS_COMPLETE) ) 

#define LSC ((op_intrpt_type() == OPC_INTRPT_SELF) && 
({ep_intrptlcede() == LSC_MSG) ||| (op_amtrpt_code() == TILEXPeRE))) 
#define IAC ({(op_intrpt_type() == OPC_INTRPT_SELF) && 
((op_intrpt_code() == IAC_MSG) || (op_intrpt_code() == T2_EXPIRE) | | 
(OpEimerpt code() == T32EXPIRE) ||| (op_introtlcode ) == T47ExXPrre))) 
#define POC ((op_intrpt_type() == OPC_INTRPT_SELF) && 
(op_intrpt_code() == POC_MSG) ) 

#define TXC ((op_intrpt_type() == OPC_INTRPT_SELF) && 
({op_intrpt_code() == TXC_MSG) || (op_intrpt_code() == T6_EXPIRE) || 
(Gumintrotecode() == T7_ EXPIRE) )) 

#define RC ((op_intrpt_type() == OPC_INTRPT_SELF) «&& 
(opeinereptecode() == RC” MSG)) 

#define AERM ((op_intrpt_type() == OPC_INTRPT_SELF) && 
(op_intrpt_code() == AERM_MSG) ) 

#define SUERM ((op_intrpt_type() == OPC_INTRPT_SELF) && 
(Gpeintre. code () == SUBERM= MSG) } 

#define CC ((op_intrpt_type() == OPC_INTRPT_SELF) && 
((op_intrpt_code() == CC_MSG) || (op_intrpt_code() == TS_EXPIRE) )) 

a a a a Sa ae a ce Sa: So /mce: Ak ave see Sense Aes Gees: at senes cme: SnAg, Suse’ St Same: Sonne Spm Sone seams (Genny. am COmanT< Sem comet’ Coam nn Sn\ Ae (pen (Geant nS aS (AS: Gone coma: NOR QomD GOS) | Sea Sem Sees Soc eA A Gam GN Sena” AOE aoe * / 
/* (7) Data Types i 
Vhs SS SS SS SS SS SS Se SS SS SS SS SS SS SS SS SS SS SS SS eS SS SS SS SSS SS SS SS SSS SS SSS SS SS SS SS SS SS SS SS SS SS SS eS eee 


/* Definition of a standard timer data structure */ 
typedef struct { 


Evhandle ev; /* The OPNET event handle for the self interrupt */ 
ite code; /* KR code value to be returned by the interrupt */ 
double delay; /* The time before the timer expires ay, 
char active; /* True if the timer is running ay. 


} timer_type; 


[oe ee ee eS oe ee Se eS See 
/* (8) Function Prototypes ia 
[* S3=seees5——5 5—-——-— > = -————— —— = = = =o = = ee eee a a a ee ee 


int DAEDR(Packet * pkptr); 


int mtp2_increment (int value, int step, int mod_number) ; 
int mtp2_decrement (int value, int step, int mod_number) ; 


Ine 1s BSNRovalid({int PSN, int FSNT, int BSNR) ; 


void mtp2_timer_start(timer_type * timer); 
void mtp2_timer_stop(timer_type * timer); 


void mtp2_send_external_msg(Objid target_id, int msg_code, int msg_data, Ici * 
piesigel cia) 5 


void IAC_LSC_ALIGNMENT_COMPLETE () ; 
void IAC_LSC_ALIGNMENT_NOT_POSSIBLE(); 
void TXC_LSC_LINK_FAILURE() ; 

VO1d "RC _LSeesto (); 

VOld “RE LSC SIN(): 
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void 
void 
void 
void 
void 
Vola 
void 


void 
void 
void 
void 
void 
void 
void 
void 


Oa 
void 


Voud 
void 
void 
io see 


void 
Vourd 
void 
void 
void 
void 
void 
void 
void 


void 
void 
void 
void 
void 


void 
void 
void 
void 
void 
void 
vVoud 
void 
Vou 
vord 
vo1d 
void 
void 
void 
void 


void 
void 
void 
void 
void 


RC_LSC_SIE(); 

RC_LSC SIOS(); 
RC_LSC_SIPO(); 
RC_LSC_FISU_MSU_RECEIVED () ; 
RC_LSC_LINK_FAILURE() ; 
SUERM_LSC_LINK_FAILURE () ; 
POC_LSC_NO_PRO_OUTAGE() ; 


LSAC_LSC_START () ; 
LSAC_LSC_STOP(); 
LSAC_LSC_EMERGENCY () ; 
LSAC_LSC_EMERGENCY_CEASES () ; 
ipSAC LSC_FLUSHSBUFFERS () ; 

PsAe2 Ese CONTINVUE() > 
LSAC_LSC_LOCAL_PRO_OUTAGE () ; 
LSAC_LSC_LOCAL_PRO_RECOVERED () ; 


MeCEFESC RETRIEVE_SSNT (); 
PeeClESC RETRIBVAD_REO_FSNC(); 


MGMT_LSC_POWER_ON() ; 
MGMT_LSC_LEVEL3_FAILURE() ; 
MGMT_LSC_LOCAL_PRO_OUTAGE(); 
MGMT_LSC_LOCAL_PRO_RECOVERED() ; 


LSC_IAC_START(); 
Boece lane STOP (); 
LSC_IAC_EMERGENCY () ; 
Reeraee SLO); 
ReerACssSIN(); 
REZTACESIE(); 

Res TAGesIOS(); 
AERM_IAC_ABORT_PROVING () ; 
DAEDR TAC CORRECT_SU(); 


LSC_POC_LOCAL_PRO_OUTAGE ( ) ; 
LSC_POC_LOCAL_PRO_RECOVERED () ; 
LSC_POC_REMOTE_PRO_OUTAGE () ; 
ibSC] POC REMOTE _ PRO RECOVERED () ; 
Poem rOC STOP (); 


ESearxkc START () ; 
LSC_TXC_SEND_SIOS(); 
LSC_TXC_SEND_SIPO() ; 

TAG TAC SEND_S1I0(); 
IAC_TXC_SEND_SIN(); 
IAC_TXC_SEND_SIE(); 

CGT. CeSEND SIB() ; 
LSC_TXC_SEND_FISU(); 
LSC_TXC_SEND_MSU () ; 
ResTxC. SEND ONACK () ; 

Remi xCoSIB RECEIVED () ; 
RC_TXC_BSNR_AND_BIBR(int bsnr, 
RGSTXGEPRSNX (int fsnx) ; 
LSC_TXC_RETRIEVAL_REQ_FSNC () ; 
LSC_TXC_FLUSH_BUFFERS (); 


LSC RC START (); 

PoCeRe SLOP (); 
LSC_RC_RETRIEVE_BSNT () ; 
LSC_RC_RETRIEVE_FSNX () ; 
Peel ne REJECT MSU_FISU(); 


Ame) Sibr)-> 


>> 


igeyeltel 
void 


void 
void 
void 


void 
void 
void 
void 
void 


void 
void 
void 
void 


void 
void 


LSC_RC_ACCEPT_MSU_F1ISU(); 
TXC-_RGMEPSNT (int Ese): 


XXX_RC_CONGESTION_DISCARD () ; 
XXX_RC_CONGESTION_ACCEPT () ; 
XXX_RC_NO_CONGESTION () ; 


LSCLAERM SET T31 To Tin); 
IAC_AERM SET Ti_To_Tie(); 
IAC_AERM_ START (); 
IAC_AERM STOP (); 
DAEDR_AERM_SU_ERROR (); 


LSC_SUERM_START () ; 
PocesuERM STOP (); 
DAEDR_SUERM_SU_ERROR () ; 
DAEDR_SUERM_CORRECT_SU () ; 


RC_CC_NORMAL {) ; 
Reece e BUSY (); 
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|b STATE VARIABLES 


/* Process’s own Object ID */ 
Obie \own_1d; 


/* Object ID of expected MTP Level 3 neighbour */ 
Obata) \mtps_id; 


/* Log file handle for link status */ 
Log_Handle \log_hdle_link_status; 


/* mtp3’‘s input stream for MSU retrieval */ 
ne \mtp3_retrieve_input_stream; 


/* The servic rate of the link */ 
double \service_rate; 


/* Service time of the LSC Function */ 
double \LSC_service_time; 


/ SceEwwcewtrme of tue TAC Function */ 
Gouble \IAC_service_time; 


/* Service time of the POC Function */ 
double \POC_service_time; 


) service time of the TXC Function */ 
double \TXC_service_time; 


/* Service time of the RC Function */ 
double \RC_service_time; 


/* Service time of the AERM Function */ 
double \AERM_service_time; 


/* Service time of the SUERM Function */ 
double \SUERM_service_time; 


/* Service time of the CC Function */ 
double \CC_service_time; 


/* BRERM threshold for normal link status */ 
nig aos \Tin-; 


/* AERM threshold for Emergency Link Status */ 
inte \Die; 


/* SUERM Threshold */ 
int VE 


/* SUERM Parameter */ 
int \D; 


/* SUERM parameter */ 
Phi XIN; 


/* No. of Proving Periods allowed by IAC */ 
Int \M; 


/* Alignment Ready Timer for LSC */ 
double \T1; 


a) 


/* Net Aligned=imer stor LAC */ 
double \12Z; 


/* Aligned Timer tor IAC */ 
double Tar 


/* Normal Proving Period Timer for IAC */ 
double \T4_Pn; 


/* Emergency Period Timer for IAC */ 
double \T4_Pe; 


/* sending SIB Timer for CC */ 
double \T5; 


/* Remote Congestion TImer for TXcC */ 
double <T6; 


/* Excessive Delay in ACK Timer for TXC */ 
double \T7-; 


/* ICI pointer for external msg */ 
Ici * \iciptr_external; 


j/*=Sstate of USC) */ 
inva \dv_LSC_state; 


/* Local processor outage while not in servive */ 
soe \dv_LSC_local_processor_outage_during_alignment_flag; 


/* Processor Outage while in Service */ 
alg eke \dv_LSC_processor_outage_during_service_flag; 


/* Emergency link status */ 
ait \dv_LSCc_emergency_flag; 


/* Level3 indication received */ 
ic \dv_LSC_level3_indication_received_flag; 


/* Ti value used by LSC */ 
Bebe NOV oe. Tir. 


/* state o£ TAC */ 
a mit \dv_IAC_state; 


/* Emergency status */ 
Aerie \dv_IAC_emergency_flag; 


/* Further proving required */ 
ant \dv_IAC_further_proving_flag; 


;> Cp counter for IAC */ 
bhehe Mele TAC. Cp: 


/* state of POC */ 
int \dv_POC_state; 


/* state of TXC */ 
Ie \dv_TXC_state; 


/* LSSU available for transmission */ 
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abee \dv_TXC_LSSU_available_flag; 


JeeReS, 1S rubles, 
Int Navel neonteetull flag; 


/* Link status busy received by RC */ 
Bl gies \dv_TXC_SIB_received_flag; 


/* Inhibit MSU tarnsmission */ 
Swale \dv_TXC_MSU_inhibited_flag; 


/* Link status */ 
ine \dv_TXC_status_indication; 


/* FSN of lst(oldest) MSU in RTB */ 
ele Newt 7c SNF: 


/* FSN of last(newest) MSU in RTB */ 
Int Veuve t AC _ FSNL ; 


/* FSN of last transmiteed MSU */ 
Ine Seve 1 AC FSNT; 


/* FSN of next MSU expected fom remote SP */ 
await \dv_TXC_FSNX; 


/* FSN of last acceptec MSU by remote SP */ 
int Naveen e FP SNC; 


/* BSN of MSU last recieved by RC */ 
it \dv_TXC_BSNR; 


/* BSN of last transmitted MSU */ 
albane Nev ExXC BSNT;> 


/* FIB of last transmitted MSU */ 
FAC \dv_TXC_FIBT; 


/* BIB of last transmitted MSU */ 
Int MelvetAc BEST; 


/* current FIB value */ 
shee NavVeLrecc.FiIB; 


/* current BIB value */ 
bale rave [AC BiB: 


/* BIB of MSU last received by RC */ 
ane New te BIB; 


/* Number of MSUs in TB */ 
abe 1e New Exe. Cm, 


J/* state of RC */ 
sh alk a \dv_RC_state; 


/* accept MSU and FISU allowed */ 
beds \dv_RC_MSU_FISU_accepted_flag; 


/* abnormal FIB recieved */ 
ae \dv_RC_abnormal_FIBR_flag; 


a, 


/* abnormal BSN recieved */ 
pu ghe \dv_RC_abnormal_BSNR_flag; 


/* congestion discard mode */ 
nage Vdv=RC “congestion cdiscara tlag; 


/* congestion accept mode */ 
int \dv_RC_congestion_accept_flag; 


/* Link status received */ 
mits \dv_RC_status_indication; 


/* FSN of lst MSU in RTB */ 
Int \dv_RC_FSNF; 


/* expected FSN value to receive */ 
al) gic \dv_RC_FSNZ; 


/* expected FIB to receive */ 
Ogle Nav =oRC FIBX; 


/* transmitted FSN value */ 
beh e \dv_RC_FSNT; 


/* transmitted BSN value */ 
bole \dv_RC_BSNT; 


/* retransmission required */ 
rite \dv_RC_RTR; 


/* received FSN value */ 
Int \dv_RC_FSNR; 


/* received FIB value */ 
int hay RC _FIBR; 


/* received BSN value */ 
int \dv_RC_BSNR; 


/* received BIB value */ 
Tyee \dv_RC_BIBR; 


/* received Length Indicator value */ 
ime \VdveRC LI; 


/* recovery from abnormal BIBR for RC */ 
slight \dv_RC_UNF; 


/* recovery from abnormal BSNR for RC */ 
sy gls \dv_RC_UNB; 


/* state of AERM */ 
Int \dv_AERM_state; 


/* Ti value for AERM */ 
int \dv_AERM_Ti; 


/* Ca counter for AERM */ 
int \dv_AERM_Ca; 


/* state of SUERM */ 
Ine \dv_SUERM_state; 
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7/* Cs counter for SUBRM */ 
slvei sd \dv_SUERM_Cs; 


/* Nsu value for SUERM */ 
ive \dv_SUERM_Nsu; 


py estace. of CC */ 
Int \dv_CC_state; 


/* timerl data structure */ 
timer_type \dv_timerl; 


/* timer2 data structure */ 
timer_type \dv_timer2; 


/* timer3 data structure */ 
timer_type \dv_timer3; 


/* timer4 data structure */ 
timer_type \dv_timer4; 


/* timerS data structure */ 
timer_type \dv_timerS; 


/* timer6 data structure */ 
timer_type \dv_timer6; 


/* timer7 data structure */ 
timer_type \dv timer? ; 


/* SU transmission request flag */ 
Lic \trans_req; 


/* Pointer for packet to be transmitted */ 
Packet * \DKpER- ex; 


/* time link is in service */ 
double \start_time; 


/* total bits received */ 
double total bits_recv; 


J Sotatistic handle for link utilization, */ 
Stathandle \link_utilization_handle; 


6] 


C. 


Packet 
Packet 
Packet 
Packet 
nee 
plighe 
ite 
double 
double 
A Gessl mei 


* + %+ 


TEMPORARY VARIABLES 


pkptr; 
PRKDEr tx pau; 
PkpGr. E56; 
DEptr rx “pdu; 
packet_no_error; 
msg_code; 
SU_type_to_send; 
SU_len; 

SULExX time; 
fereer input: 


char strli[ iol; 


Inti 
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Dp: FUNCTION DECLARATION 


ee ee ee SS = Se SS SS SS SS SS = = = / 
/* FUNCTIONS by 
/* Signaling System 7 (SS7), Message Transfer Part Level 2 (MTP2) ay 
(-s1t0-T, 0.703, Jul 1996 ia | 
/* The functions here includes iy | 
iis (1) DAEDR transmission Error Function se 
igs (2) Binary increment and decrement functions a/ 
bes (3) Timer start/stop functions wi! 
1 hig: (4) Inter-level Communication Function a/ 
le (5) Packet Queuing functions for all internal messages iy 6 
i * SS SS SS SS SS SS SS SSeS SS SS SS SSS SSS SSS SS ESS SS SS SS eS SS Ss SS SS SS SS SS SS BS SS SS SS SS SS SS SS SS SS SS SS * / 
ry * ——_—<—<—<—<—S—S eo oS So ee a eae ae <_< << << = ay 
/* (1) DAEDR transmission Error Function wis 
JS SSR SS SSeS SS Sa SS SS Se eS SS SS SS SS Se = Se a Sa are 


/* This function represents the Delimitation, Alignment and Error */ 
/* Detection (receiving), DAEDR function of MTP2. It is executed */ 


/* everytime a SU is received from the link, it should decide ny, 
/* whether the SU packet is correct or in error. Channel error aes 
/* characteristics can be simulated by this function. Should the */ 
/* function decides that the SU is correct it sends a 
/* "DAEDR_IAC_CORRECT_SU" and "DAEDR_SUERM_CORRECT_SU" else it ef 
/* “DAEDR_SUERM_SU_ERROR" and "DAEDR_AERM_SU_ERROR". In this ba: 
/* implementation the former is used assuming zero channel error */ 
/* but should be modified as per requirement otherwise ot / 


int DAEDR(pkptr) 
Packet * pkptr; 
{ 


int status; 

BIN ( DAEDR( pkptr)); 
DAEDR_IAC_CORRECT_SU(); 
DAEDR_SUERM_CORRECT_SU(); 
status = TRUE; 


FRET (status); 


a a ee ae ee ee ee ee ee 
/* (2) Binary increment and decrement functions iat 
J“ SeSSSSSS SSS SS SS SSS SSSSSrSsee = HS HS SS a Se Se SS Sa a SS SS SH SS SH SH SSS SS SS SSS == */ 


/* define Binary increment */ 

int mtp2_increment (value, step, mod_number) 
int value; 
int step; 
int mod_number; 


int result; 
FIN (mtp2_increment (value, step, mod_number) ) 


result = (value + step) % mod_number; 


FRET (result); 
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/* define Binary decrement */ 

int mtp2_decrement (value, step, mod_number) 
int value; 
int step; 
int mod_number ; 


int resuile- 
FIN (mtp2_decrement (value, step, mod_number) ); 


if ((value - step) < 0) { 

result = mod_number - (step - value); 
} 
else { 

result = value - step; 


} 


FRET (result); 


} 

/* this function checks whether BSNR is valid or not */ 
/* it has to be between FSNF-1 and FSNT Mod = 
/* it is used by RC for MSU checks a 


int is_BSNR_valid(FSNF, FSNT, BSNR) 
int FSNF; 
int FSNT; 
int BSNR; 


int status; 
int end; 
int lowerlimit; 


FIN(is_BSNR_valid(FSNF, FSNT, BSNR)); 


status = FALSE; 
end = FALSE; 
lowerlimit = mtp2_decrement (FSNF, 1, MOD_SN); 
while (!status && !end) { 
if (BSNR == lowerlimit) { 
status = TRUE; 
} 
1£ (lowerlimit == FSNT) { 
end = TRUE; 
} 
lowerlimit = mtp2_increment (lowerlimit, 1, MOD_SN) ; 


FRET (status) ; 


a eee ee ee ee a a ee re 
/* (3) Timer start/stop functions nee 
, = Se SS SS SS SS SS eee eee ee ee ee 


/* These functions emulate a "timer" by using OPNET’s self interrupts */ 


void mtp2_timer_start (timer) 
timer_type * timer; 


{ 
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} 


/* Start a timer, by queueing a self interrupt request. sd 
/* stop it first and restart if the timer is already running; */ 
FIN (mtp2_timer_start (timer) ); 


if (timer->active) { 
op_ev_cancel (timer->ev) ; 

} 

timer->ev = op_intrpt_schedule_self(op_sim_time() + timer->delay, 
timer->code) ; 

timer->active = 1; 


Four? 


void mtp2_timer_stop(timer) 


{ 


timer_type * timer; 


/* Stop a timer by canceling its outstanding interrupt request. */ 
/* (Demetweancel the interrupt ifdteis thescurrentwone, as this */ 
/* causes an error in the simulation kernel.) gi 


FIN (mtp2_timer_stop(timer) ); 


if (timer->active && !(op_intrpt_type() == OPC_INTRPT_SELF && 
op_intrpt_code() == timer->code)) { 
op_ev_cancel (timer->ev) ; 


} 


timer->active = 0; 

POW MEG 

See ee eS eee ee ee oe a a * 7 
(4) Inter-level Communication Function a / 
ee ee ee ee eee en ne ee ee eee een ee ee ee ee ee ee ee ee ee ee ae ee on es et a oe es x i 


/* send an external message function */ 


void mtp2_send_external_msg(target_id, msg_code, msg_data, iciptr) 


Objid target_id; 
int msg_code; 
int msg_data; 
JEClay ae Salfarhy of at ar, 


FIN (mtp2_send_external_msg(target_id, msg_code, msg_data, iciptr)); 
/* set the ICI data and install it to the current interrupt */ 
Op i1eci_attr_set (iciptr epdata"*, msg data); 


Oparcie install (ieiper); 


/* activate the interrupt to send out the message code and data value */ 
op_intrpt_force_remote (msg_code, target_id); 


/* de-install the ICI so the they do not appear in future interrupts */ 
op_ici_install(OPC_NIL) ; 


FOUL; 
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/* print a warning message */ 
void ss7_mtp2_warn (msg) 

ehar > msg; 
{ 


/* Print a warning message */ 
FIN (ss7_mtp2_warn(msg) ); 


Op = Org loab print_major (“Warning from SS7 mtp2 functions:"“, msg, OPC_NIL); 
FOUT; 

} 

i ————— */ 

/* (5) Packet Queuing functions for all internal messages a 

t ie: SS SY SS SS SS STS SS SS S88 SSS S88 SS SSS SS SS S58 SS SS SS SS SSS SS SS SS SS SS SS SS S38 eS SS 8 8 SS SS Sr aS SS Sr Sr9_ Ss SS SSS wets 


/* define packet queuing functions for messages send to LSC */ 


void IAC_LSC_ALIGNMENT_COMPLETE () 


{ 
Packet * pkptr; 


FIN (IAC_LSC_ALIGNMENT_COMPLETE () ) ; 


pkptr = op_pk_create (0); 
op_pk_fd_set(pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, 
MSG_IAC_LSC_ALIGNMENT_COMPLETE, 16); 
if (op_subq_pk_insert (LSC_BUFFER, pkptr, OPC_QPOS_TAIL) != OPC_QINS_OK) { 
op_pk_destroy (pkptr); 


BOUL 
} 


void IAC_LSC_ALIGNMENT_NOT_POSSIBLE() 


{ 
Packet * pkptr; 


FIN (IAC_LSC_ALIGNMENT_NOT_POSSIBLE() ) ; 

pkptr = op_pk_create (0) ; 

op_pk_fd_set(pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, 
MSG_IAC_LSC_ALIGNMENT_NOT_POSSIBLE, 16); 


tf (Op_subq_ pk insert (bSC_BUFPFER, pkptr, OPCIGP@S TAIL) != OPCEOINS_ OR) { 
op_pk_destroy(pkptr) ; 


POUT: 
} 
void TXC_LSC_LINK_FAILURE() 
{ 

Packet * pkptr; 


PIN (ExCeabse —LINK=FAILURE() ) ; 


pkptr = op_pk_create(Q); 
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Opepk tdeset(pkptr, FD_INDEX_1ST, 
MSG_TXC_LSC_LINK_FAILURE, 16); 
if (op_subq_pk_insert (LSC_BUFFER, 
op_pk_destroy(pkptr) ; 
} 


POUT; 
} 


Voi dienes 562510 () 


{ 
Packet * pkptr; 


Pert RC ESCRStO () ) ; 


pkptr = op_pk_create(0); 
op_pk_fd_set(pkptr, FD_INDEX_1ST, 
IES je 
if (op_subq_pk_insert (LSC_BUFFER, 
op_pk_destroy(pkptr) ; 
} 


FOUT ; 
} 


void RC_LSC_SIN() 


{ 
Packet * pkptr; 


FIN(RC_LSC_SIN()); 


Diper = Opupk create (0); 
op_pk_fd_set (pkptr, FD_INDEX_1ST, 
Loy 
if (op_subq_pk_insert (LSC_BUFFER, 
op_pk_destroy(pkptr) ; 
} 


FOUT; 
} 


void RC_LSC_SIE() 
{ 
Packet * pkptr; 


FINGRC SUSC_ SiEB()); 


Bkptr = op pk _create(0): 
op_pk_fd_set (pkptr, FD_INDEX_1ST, 
1 SS es 
if (op_subq_pk_insert (LSC_BUFFER, 
op_pk_destroy(pkptr) ; 
} 


FOUT; 
} 


void RC_LSC_SIOS() 
{ 
Packet * pkptr; 


BIN(RC_LSC_SiOS().); 


QOPeaeTELDalyPeE DOUBLE, 


PKDES, 


OPG_OPGS_TAIL) 


mor eZOrinS OK) 


{ 


OPC _-FPIBLDETYPELINTEGER, MSG_RE2bLSC_SiIoO, 


pkptr, 


OPGH2OPOSeTAIL) 


'=—0PC_O—ENS_OK) 


{ 


OPCS? TELE ree INTEGER, MoG Re moc Soin, 


PKEED: 


OPC_QPOS_TAIL) 


VamOrCZOINS_OK) 


{ 


OPCSE TEL DEt PELE GEn, MSG2.G 2 LSC2SiE, 


pkptr, 
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OPC_OP@S_TAIL) 


l=OPClZOINS_OK) 


{ 


pkptr = op_pk_create(0Q); 


Op pkKateaeseti(pkpter, FRDLINDEX LIST, 


16); 


if (op_subq_pk_insert (LSC_BUFFER, 


op_pk_destroy(pkptr) ; 
} 


FOUL; 
} 


void RC_LSC_SIPO() 
{ 
Packet * pkptr; 
FIN (RC_LSC_SIPO()); 


pkptr = op_pk_create(0); 


op_pk_fd_set (pkptr, FD_INDEX_1ST, 


ILS) 


if (op_subq_pk_insert (LSC_BUFFER, 


op_pk_destroy (pkptr) ; 


EFOUT;: 
} 


VOleunee LSClFISU_MSU_RECEIVED(} 


{ 
Packet * pkptr; 


FIN (RC_LSC_FISU_MSU_RECEIVED()); 


Papers Op pk create (0); 
op_pk_fd_set(pkptr, FD_INDEX_1ST, 
MSG_RC_LSC_FISU_MSU_RECEIVED, 16); 
if (op_subq_pk_insert (LSC_BUFFER, 
op_pk_destroy (pkptr) ; 
} 


FOUT; 
} 


void RC_LSC_LINK_FAILURE () 


{ 
Packet * pkptr; 


FIN (RC_LSC_LINK_FAILURE ()) ; 


pkptr = op_pk_create(0); 
op_pk_fd_set(pkptr, FD_INDEX_1ST, 
MSG_RC_LSC_LINK_FAILURE, 16); 
if (op_subq_pk_insert (LSC_BUFFER, 
op_pk_destroy (pkptr); 


BOUT; 
} 


void SUERM_LSC_LINK_FAILURE () 
{ 
Packet * pkptr; 


OPC FF TELDETYPE_INTEGER, MSG_-RG@ESC SIOsS, 


pKptu, OPC_OPOSeTATL) 1=s0PClOms. OK) at 


OPG2 TEED Sper ESN T EGER ocean eCmuscoms LhO, 


pkptr, OPC_QPOS_TAIL) != OPC_QINS_OK) { 


OPCEETELD TY PE_INTEGCER, 


pkptr, OPC CPOs TALL) \= GPGzOImns sor) { 


OPC _FIELDSty Ee thni EGER, 


pkptr, CPCZOFOSLTAIE) ©! = OPC _OINS#Or) a { 
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PIN (SUBRM LSC] LINK FAILURE ()); 


pkptr = op_pk_create(Q0Q); 
Opera set (pkptr, FDLINDEX_1ST, 
MSG_SUERM_LSC_LINK_FAILURE, 16); 
if (op_subq_pk_insert (LSC_BUFFER, 
op_pk_destroy(pkptr) ; 
} 


FOUT: 
} 


void POC_LSC_NO_PRO_OUTAGE () 


{ 
Packet * pkptr; 


FIN(POC_LSC_NO_PRO_OUTAGE() ) ; 


Dkptr = op _pk create (0) ; 
Op pieta set (pkptr, FRLINDEX_ 1ST, 
MSG_POC_LSC_NO_PRO_OUTAGE, 16); 
if (op_subq_pk_insert (LSC_BUFFER, 
op_pk_destroy(pkptr) ; 
} 


FOUT; 
} 


void LSAC_LSC_START () 


{ 
Packet * pkptr; 


FIN(LSAC LSC_START()); 


pkptr = op_pk_create(0); 
Oprpk td set (pkptr, FD_INDEX_1ST, 
MSG_LSAC_LSC_START, 16); 
if (op_subq_pk_insert (LSC_BUFFER, 
op_pk_destroy(pkptr) ; 
} 


FOuT: 
} 


void LSAC_LSC_STOP() 


{ 
Packet * pkptr; 


FIN (LSAC_LS€ZSTORG Os 


pkptr = op_pk_create (0); 
op_pk_fd_set(pkptr, FD_INDEX_1ST, 
Se 
if (op_subq_pk_insert (LSC_BUFFER, 
op_pk_destroy (pkptr) ; 
} 


FOUL; 
} 


void LSAC_LSC_EMERGENCY () 


CeGeZe Ir LD. hy PE-INTECER, 


Pkpti, OPEGSO@POSeTAIL) != OPC_OINS_OK) { 


OPCEF IER Psi were ECER, 


pkptr;, OPC_OPOS_TAIL)> != @PC_O@NS_ OK) { 


OPC FIELD UT YPELINITSCER, 


pkptr, OPC_OPOS_TAIL) != OPC_OINS_OK) { 


OPC_FIELD_TYPE_INTEGER, MSG_LSAC_LSC_STOP, 


PKpEr, OPC_QOPOS_TAIL) != OPC_OINS_OK)* { 


69 


Packet ~~ pkpesr; 
FIN (LSAC_LSC_EMERGENCY () ) ; 


pkptr = op_pk_create(0); 
Opapheroesetipkptr, FDLINDEXZIST, 
MSG_LSAC_LSC_EMERGENCY, 16); 
if (op_subq_pk_insert(LSC_BUFFER, 
op_pk_destroy(pkptr) ; 
} 


POUT; 
} 


void LSAC_LSC_EMERGENCY_CEASES () 


{ 
Packet * pkptr; 


FIN(LSAC_LSC_EMERGENCY_CEASES()); 


pkptr = op_pk_create (0) ; 
op_pk_fd_set(pkptr, FD_INDEX_1ST, 
MSG_LSAC_LSC_EMERGENCY_CEASES, 16); 
tet (Op subd _pk_insert (LSC_BUFFER, 
op_pk_destroy(pkptr) ; 
} 


BOUL; 
} 


void LSAC_LSC_FLUSH_BUFFERS () 


{ 
Packet * pkptr; 


Pali sAc ES€rriUSH BUEFERS<))’; 


pkptr = op_pk_create(0); 
Op PKeta see (pkKptr, FDZINDEXSIST, 
MSG_LSAC_LSC_FLUSH_BUFFERS, 16); 
if (op_subq_pk_insert (LSC_BUFFER, 
Op. pk destroy (pkptr)- 
} 


BOUT: 
} 


void LSAC_LSC_CONTINUE () 


{ 
Packet * pkptr; 


Pain SAC _LSC_CONTINUE()) ; 


pkptr = op_pk_create(0); 
Op _pk#ra_set (pkptr, FD_INDEX_1ST, 
MSG_LSAC_LSC_CONTINUE, 16); 
if (op_subgq_pk_insert (LSC_BUFFER, 
op_pk_destroy(pkptr) ; 
) 


FOUR, 


OPGEFIELDETY PESINTEGER, 


pkptr, 


OPC_QPOS_TAIL) 


1= 4OPC_OZNS2CK) 


ORGS TLELDSPYPE- INTEGER? 


PKPEL, 


OPC_QPOS_TAIL) 


!= OPC_OQINS_OK) 


OPGarIELDSTYPESINTECER, 


pkptr, 


OPC_QPOS_TAIL) 


!= OPC_OINS_OK) 


OPC Sree Lbs TY PE INTEGER? 


pKpEr, 
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OPC_QPOS_TAIL) 


!= OPC_OQINS_OK) 


{ 


{ 


{ 


{ 


void LSAC_LSC_LOCAL_PRO_OUTAGE () 


{ 
Packet * pkptr; 


FIN (LSAC_LSC_LOCAL_PRO_OUTAGE () ) ; 


pkptr = op_pk_create (0); 
op_pk_fd_set(pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, 
MSG_LSAC_LSC_LOCAL_PRO_OUTAGE, 16); 
if (op_subq_pk_insert(LSC_BUFFER, pkptr, OPC_QPOS_TAIL) != OPC_QINS_OK) { 
op_pk_destroy (pkptr) ; 
} 


FOUT; 
} 


void LSAC_LSC_LOCAL_PRO_RECOVERED () 


{ 
Packet * pkptr; 


FIN (LSAC_LSC_LOCAL_PRO_RECOVERED () ) ; 


pkptr = op_pk_create(0); 
op_pk_fd_set (pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, 
MSG_LSAC_LSC_LOCAL_PRO_RECOVERED, 16); 
if (op_subq_pk_insert(LSC_BUFFER, pkptr, OPC_QPOS_TAIL) != OPC_QINS_OK) { 
op_pk_destroy (pkptr) ; 
} 


BOUT; 
} 


Vord TGOGeLSC RETRIEVE BSN () 


{ 
Packet * pkptr; 


Pin (TCOC LSC_REPRIBVE_BSNT()); 


pkptr = op_pk_create(0); 
op_pk_fd_set(pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, 
MSG=TCOC LSC_RETRIEVE_BSNT, 16); 
if (op_subq_pk_insert (LSC_BUFFER, pkptr, OPC_QPOS_TAIL) != OPC_QINS_OK) { 
op_pk_destroy (pkptr) ; 
} 


POUL, 
} 


void TCOC_LSC_RETRIEVAL_REO_FSNC () 


{ 
Packet * pkptr; 


PrN ( PeCOCeLSC -RETRIEVAL-REO FSNC())); 


pkptr = op_pk_create (0); 
op_pk_fd_set(pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, 
MSG_TCOC_LSC_RETRIEVAL_REQ_FSNC, 16); 
if (op_subg_pk_insert (LSC_BUFFER, pkptr, OPC_QPOS_TAIL) != OPC_QINS_OK) { 
op_pk_destroy(pkptr) ; 


fi 


BOUT. 
} 


void MGMT_LSC_POWER_ON () 


{ 
Packet * pkptr; 


FIN (MGMT_LSC_POWER_ON()); 


pkptr = op_pk_create(0) ; 
op_pk_fd_set(pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, 
MSG_MGMT_LSC_POWER_ON, 16); 
if (op_subq_pk_insert(LSC_BUFFER, pkptr, OPC_QPOS_TAIL) != OPC_QINS_OK) { 
Spepk destroy (pkptr); 
} 


POU; 
} 


void MGMT_LSC_LEVEL3_FAILURE () 


{ 
Packet * pkptr; 


FIN (MGMT_LSC_LEVEL3_FAILURE () ); 


pkptr = op_pk_create (0) ; 
Gp pk fd set (pkptr, FDeINDEX2 sl, Ore. FilELpet PE INTEGER? 
MSG_MGMT_LSC_LEVEL3_FAILURE, 16); 
if (op_subq_pk_insert (LSC_BUFFER, pkptr, OPC_OQPOS_TAIL) != OPC_QINS_OK) { 
op_pk_destroy(pkptr); 
} 


BOUL, 
} 


void MGMT_LSC_LOCAL_PRO_OUTAGE () 
{ 
Packet * pkptr; 


FIN (MGMT_LSC_LOCAL_PRO_OUTAGE () ) ; 


DKptr = op pk create (0); 
op_pk_fd_set(pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, 
MSG_MGMT_LSC_LOCAL_PRO_OUTAGE, 16); 
if (op_subgq_pk_insert (LSC_BUFFER, pkptr, OPC_QPOS_TAIL) != OPC_QINS_OK) { 
op_pk_destroy(pkptr) ; 


BOUT; 
} 


void MGMT_LSC_LOCAL_PRO_RECOVERED () 


{ 
Packet * pkptr; 


FIN (MGMT_LSC_LOCAL_PRO_RECOVERED () ) ; 


pkptr = op_pk_create(0); 
op_pk_fd_set(pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, 
MSG_MGMT_LSC_LOCAL_PRO_RECOVERED, 16); 
if (op_subq_pk_insert (LSC_BUFFER, pkptr, OPC_QPOS_TAIL) != OPC_QINS_OK) { 
op_pk_destroy (pkptr) ; 


We 


i 


FOUT; 
} 


/* define packet queuing functions for messages send to IAC */ 


void LSC_IAC_START() 


{ 
Packet * pkptr; 


FIN(LSC_IAC_START()); 


pkptr = op_pk_create(0); 
op_pk_fd_set(pkptr, FD_INDEX_1ST, 
V6) 5 
if (op_subq_pk_insert (IAC_BUFFER, 
op_pk_destroy(pkptr) ; 
} 


FOUT; 
} 


vVoOmd mSC TAC STOP () 


{ 
Packet * pkptr; 


BIN {LSC_TAC STOP ()); 


pkptr = op_pk_create (0); 
op_pk_fd_set(pkptr, FD_INDEX_1ST, 
hey"; 
if (op_subq_pk_insert (IAC_BUFFER, 
op_pk_destroy(pkptr) ; 


POUT; 
} 


void LSC_IAC_EMERGENCY ( ) 


{ 
Packet * pkper; 


FIN (LSC_IAC_EMERGENCY () ) ; 


Peptr = op pk create (0); 
op_pk_fd_set (pkptr, FD_INDEX_1ST, 
MSG_LSC_IAC_EMERGENCY, 16); 
if (op_subq_pk_insert (IAC_BUFFER, 
op_pk_destroy(pkptr) ; 
} 


FOUT; 
} 


VeEGdeRe  lAG SilO(} 

{ 
Packet * pkptr; 
PEN (RC IAC SiO()); 


pkptr = op_pk_create(0) ; 


OPC] FIELD _TYPE_INTEGER, MSG_LSC_IAGHSTART, 


pkptr, OPC_QPOS_TAIL) != OPC_QINS_OK) { 


OPC_FIELD_TYPE_INTEGER, MSG_LSC_IAC_STOP, 


pkptr, OPC_OPOS_TAITL) |= Ore2eTNsS Orn) { 


OPG2Etr LD TY PEL INEEGER, 


pkptr, OPC_OPOS_ TAIL) != OPC {OINS_OK) { 


iG 


op_pk_fd_set(pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, MSG_RC_ IAC SI0o, 
Gi) 
if (op_subq_pk_insert (IAC_BUFFER, pkptr, OPC_QPOS_TAIL) != OPC_QINS_OK) { 
Op _pk_destroy(pkpetr) ; 
z 


FOUT; 
} 


VolenRe LACT SiN () 


{ 
Packet * pkptr; 


FIM RGEIAC SNK) ); 


pkp ee ="6p_pk_create (OF; 
op_pk_fd_set(pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, MSG_RC_IAC_SIN, 
LO) 7 
if (op_subq_pk_insert (IAC_BUFFER, pkptr, OPC_QPOS_TAIL) != OPC_QINS_OK) { 
op_pk_destroy (pkptr) ; 
} 


POUT > 
} 


VOIdeRC TAGCISIE () 


{ 
Packet.* pkptr; 


PINGEG TACSSIEW)); 


pkpta = op_pk _create(0); 
op_pk_fd_set(pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, MSG_RC_IAC_SIE, 
Ge 
if (op_subq_pk_insert (IAC_BUFFER, pkptr, OPC_QPOS_TAIL) != OPC_QINS_OK) { 
op_pk_destroy(pkptr) ; 
} 


EOUT: 
} 


void RC_IAC_SIOS() 


{ 
Packet * pkptr; 


PIN{RC_TAC SIOS (9 


pkptr = op_pk_create(0); 
op_pk_fd_set(pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, MSG_RC_IAC_SIOS, 
Gass 
if (op_subq_pk_insert (IAC_BUFFER, pkptr, OPC_QPOS_TAIL) != OPC_OINS_OK) { 
op_pk_destroy(pkptr) ; 
} 


FOUT- 
} 


void AERM_IAC_ABORT_PROVING () 
{ 
Packet * pkptr; 


FIN (AERM_IAC_ABORT_PROVING()); 
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pkptr = op_pk_create(0); 
op_pk_fd_set(pkptr, FD_INDEX_1ST, 
MSG_AERM_IAC_ABORT_PROVING, 16); 
if (op_subq_pk_insert (IAC_BUFFER, 
op_pk_destroy (pkptr) ; 
} 


FOr ; 


void DAEDR_IAC_CORRECT_SU() 


{ 
Packet * pkptr; 


FIN (DAEDR_IAC_CORRECT_SU () ); 


pkptr = op_pk_create(0); 
Spepiasba set (pkptr, FD_INDEX_1ST, 
MSG_DAEDR_IAC_CORRECT_SU, 16); 
if (op_subg_pk_insert (IAC_BUFFER, 
op_pk_destroy (pkptr) ; 
} 


FOUT ; 
} 


OPCEFIELD_TYPE_INTEGER, 


pkptr, 


OPC_QPOS_TAIL) 


'= OPC_QINS_OK) 


OPC_PIEEDESTY PEoLNTEGER, 


pkptr, 


OPC2OPOS2 TAT) 


[="OrG2ZomNsS OK) 


/* define packet queuing functions for messages send to POC */ 


void LSC_POC_LOCAL_PRO_ OUTAGE () 
{ 
Packet * pkptr; 


PINtGSe  POC_LOCAL_PRO_OUTAGE () ) ; 


pkptr = op_pk_create(0); 
Op pk fd set (pkptr, FD_INDEX_1ST, 
MSG_LSC_POC_LOCAL_PRO_OUTAGE, 16); 
1f (op_subq_pk_insert (POC_BUFFER, 
op_pk_destroy (pkptr); 
} 


BOUL; 
} 


void LSC_POC_LOCAL_PRO_RECOVERED () 
{ 
Packet * pkptr; 


OPC_FIELDITyYPESINTEGER, 


pKDeEL, 


FIN (LSC_POC_LOCAL_PRO_RECOVERED () ) ; 


pkptr = op_pk_create(0); 


OPC SOPOS TATE) 


f= OPC} OINS OK) 


op_pk_fd_set(pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, 


MSG_LSC_POC_LOCAL_PRO_RECOVERED, 16) ; 


if (op_subq_pk_insert(POC_BUFFER, 
op_pk_destroy(pkptr) ; 


Boul; 


Bkptr, 


3) 


OPC_QPOS_TAIL) 


'= OPC_QINS_OK) 


{ 


{ 


{ 


{ 


void LSC_POC_REMOTE_PRO_OUTAGE () 
{ 
Packet * pkptr; 


FIN (LSC_POC_REMOTE_PRO_OUTAGE () ) ; 


pkptr = op_pk_create(0); 

Op pk fa set (pkptr, FD_INDEX_1iST, OPC_FIELD_TYPE_INTEGER, 
MSG_LSC_POC_REMOTE_PRO_OUTAGE, 16); 

if (op_subq_pk_insert (POC_BUFFER, pkptr, OPC_QPOS_TAIL) != OPC_QINS_OK) { 

op_pk_destroy(pkptr) ; 

} 

POUT; 
} 


void LSC_POC_REMOTE_PRO_RECOVERED () 
{ 
Packet * pkptr; 


FIN (LSC_POC_REMOTE_PRO_RECOVERED () ) ; 


pkptr = op_pk_create(0); 
op_pk_fd_set(pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, 
MSG_LSC_POC_REMOTE_PRO_RECOVERED, 16); 
if (op_subq_pk_insert(POC_BUFFER, pkptr, OPC_QPOS_TAIL) != OPC_QINS_OK) { 
op_pk_destroy(pkptr) ; 
} 


I@10MaR 
} 


void LSC_POC_STOP() 
{ 
Packet * pkptr; 


EINGESC. POC =STOPR (a: 


PkKptr = op_pk_create(0)% 
op_pk_fd_set(pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, MSG_LSC_POC_STOP, 
16); 
1f (op_subq_pk_insert(POC_BUFFER, pkptr, OPC_QPOS_TAIL) != OPC_QINS_OK) { 
op_pk_destroy(pkptr) ; 
} 


FOUT: 
, 


/* define packet queuing functions for messages send to TXC */ 
void LSC_TXC_START () 
{ 

Packet * pkptr; 


FIN(GSC_TXC_START()); 


pkptr = op_pk_create(0); 
op_pk_fd_set(pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, MSG_LSC_TXC_START, 
Gls; 
if (op_subq_pk_insert (TXC_BUFFER, pkptr, OPC_QPOS_TAIL) != OPC_QINS_OK) { 
op_pk_destroy(pkptr) ; 
} 


FOUT; 
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} 

void LSC_TXC_SEND_SIOS() 

Packet * pkptr; 
FIN(LSC_TXC_SEND_SIOS()); 


pkptr = op_pk_create(0); 


op_pk_fd_set (pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, 


MSGaeLuSGer AC TSEND_SIOS, 16); 


if (op_subg_pk_insert (TXC_BUFFER, pkptr, 


op_pk_destroy (pkptr) ; 
} 


FOUT; 
} 


void LSC_TXC_SEND_SIPO() 
{ 
Packet * pkptr; 
FIN (LSC_TXC_SEND_SIPO()); 


DpKptr = op_pk create(0); 


OPC_OP@GS: TAIL) 


L= OPC] OINS._OK) 


op_pk_fd_set(pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, 


MSG ESC -TxXGSSEND SIPO, 16); 


if (op_subq_pk_insert (TXC_BUFFER, pkptr, 


op_pk_destroy (pkptr) ; 
} 


FOUL? 
} 


void IAC_TXC_SEND_SIO() 

{ 
Packet * pkptr; 
PINClIAG TXC SEND_SIO()); 


pkptr = op_pk_create(0)j; 


OPES OPOS_TAL 


!= OPC_OQINS_OK) 


Op =pketd set (pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, 


MSGEEAGETXECESEND SIO, 16); 


Lt (Op_suba pk insert (TXC_BUFFER, pkptr, 


op_pk_destroy(pkptr) ; 
i 


EOUr- 
} 


void IAC_TXC_SEND_SIN() 
{ 
Packet * pkptr; 
FIN (IAC_TXC_SEND_SIN()); 


pkptr = op_pk_create (0); 


OPG_OPOS 22a, 


!= OPC_QINS_OK) 


op_pk_fd_set(pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, 


MSGZTAC_TXC_SEND_SIN, 16); 


Pe Ope slog pkemacert (TXC_ BUFFER, pkptr, 


op_pk_destroy (pkptr) ; 


i 


OPC_QPOS_TATL) 


!= OPC_OINS_OK) 


{ 


{ 


{ 


{ 


FOUL; 
} 


VO 10 ACE CesEND SIE () 


{ 
Packet * pkptr; 


FIN(TAC_TXAC_SEND_SIE()); 


pkptr = op_pk_create(Q); 
CoephKerasset (pkptr, FD_INDEXZLST, OPC _FIELDeTyY rE INTEGER, 
MSG_IAC_TXC_SEND_SIE, 16); 
if (op_subgq_pk_insert(TXC_BUFFER, pkptr, OPC_QPOS_TAIL) != OPC_QINS_OK) { 
Op=pk destroy (pkptr); 
} 


FOUT : 


void CC_TXC_SEND_SIB() 


{ 
Packet * pkptr; 


BPN VGeST XC VSEND SEB, 


pkptr = op_pk_create(Q); 
op_pk_fd_set(pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, 
MSG_CC_TXC_SEND_SIB, 16); 
if (op_subq_pk_insert(TXC_BUFFER, pkptr, OPC_QPOS_TAIL) != OPC_QINS_OK) { 
op_pk_destroy(pkptr) ; 
} 


POUL, 
} 


void LSC_TXC_SEND_FISU() 


{ 
Packet * pkptr; 


PIN( LSC] TxXC SEND EIST ©). 


pkptr = op_pk_create(0) ; 
op_pk_fd_set(pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, 
MSG_LSC_TXC_SEND_FISU, 16); 
if (op_subq_pk_insert (TXC_BUFFER, pkptr, OPC_QPOS_TAIL) != OPC_QINS_OK) { 
op_pk_destroy(pkptr); 
} 


Fouls 
} 


void LSC_TXC_SEND_MSU() 


{ 
Packet * pkptr; 


FIN (EsG_TxX¢ _SEND_MSU ()*/); 


pkptr = op_pk_create(0); 
Op _ pk _ fd vsetipkptr, FD_INDEX_1IST, OPC_FIELD TYPE_INTEGCER, 
MSG_LSC_TXC_SEND_MSU, 16); 
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if (oOpesucg pk simsert (TXC_BUFFER, pkptr, 


op_pk_destroy (pkptr); 
} 


Four; 
} 


void RC_TXC_SEND_NACK () 
{ 
Packet * pkptr; 
FIN (RC_TXC_SEND_NACK ()); 


pkptr = op_pk_create(0); 


OPC_OPOS_TAIL) 


i= @GFC_OINS OR} 


op_pk_fd_set(pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, 


MSG RE TXC[SEND_NACK, 16); 


PE Opmsllba OK insert (TXC_BUFFER, pkptr, 


op_pk_destroy(pkptr) ; 
} 


FOUT - 
} 


void RC_TXC_SIB_RECEIVED () 

{ 
Packet * pkptr; 
FIN(RC_TXC_SIB_ RECEIVED ()); 


pkptr = op_pk_create(0); 


OPC_QPOS_TAIL) 


'= OPC_QINS_OK) 


op_pk_fd_set(pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, 


MSGHReetxXC SIB RECEIVED, 16); 


if (op_subq_pk_insert(TXC_BUFFER, pkptr, 


op_pk_destroy(pkptr); 
} 


FOUT; 
} 


void RC_TXC_BSNR_AND_BIBR(bsnr, bibr) 


int bsnr; 
Intewvprbr: 


Packet * pkptr; 


FIN (RC_TXC_BSNR_AND_BIBR(BSNR, BIBR)); 


pkptr = op_pk_create(0); 
Spepretaiscr(pkptr, FD IINDEX Ist, 
MSG_RC_TXC_BSNR_AND_BIBR, 16); 

op_pk_fd_set(pkptr, FD_INDEX_2ND, 

op_pk_fd_set (pkptr, FD_INDEX_3RD, 

if (op_subgq_pk_insert (TXC_BUFFER, 
op_pk_destroy (pkptr); 

} 


FOUL; 
} 


void RC_TXC_FSNX (fsnx) 
int fsnx; 


{ 


OPC OPOS TATE) 


!= OPC_QINS_OK) 


OPGC2ETE ED] fyYPrsINTEGER, 


OPC_FIELD_TYPE_INTEGER, bsnr, 16); 
OPC FIELD TYPE_INTEGER, bibr, 16); 


DKDEX, 


oe 


OPC_QPOS_TAIL) 


!'= OPC_OQINS_OK) 


{ 


{ 


{ 


{ 


PackCtm  erekpce ; 
FIN (RC_TXC_FSNX(fsnx) ) ; 


pkptr = op_pk_create(0) ; 
op_pk_fd_set(pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, MSG_RC_TXC_FSNX, 
Loe 
op_pk_fd_set(pkptr, FD_INDEX_2ND, OPC_FIELD_TYPE_INTEGER, fsnx, 16); 
if (op_subq_pk_insert (TXC_BUFFER, pkptr, OPC_QPOS_TAIL) != OPC_OQINS_OK) { 
op_pk_destroy(pkptr) ; 
} 


Pew i 
} 


void LSC_TXC_RETRIEVAL_REO_FSNC () 


{ 
Packet * pkptr; 


PIN(USC TXC_RETRIEVALZREO_FSNG()); 


PKptYD = Opopikzereate (0); 
op_pk_fd_set(pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, 
MSG_LSC_TXC_RETRIEVAL_REQ_FSNC, 16); 
if (op_subq_pk_insert (TXC_BUFFER, pkptr, OPC_QPOS_TAIL) != OPC_QINS_OK) { 
op_pk_destroy(pkptr) ; 
} 


FOUT; 
} 


vOoild) LsC_TACLF LUSH BUFFERS () 


{ 
Packet * pkptr; 


FINtuoc TRC ELUSH BUPRERS ())); 


pkptr = op_pk_create(0) ; 
op_pk_fd_set(pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, 
MSG_LSC_TXC_FLUSH_BUFFERS, 16); 
if (op_subq_pk_insert (TXC_BUFFER, pkptr, OPC_QPOS_TAIL) != OPC_QINS_OK) { 
op_pk_destroy(pkptr) ; 
} 


BOUL; 
} 


/* define packet queuing functions for messages send to RC */ 
void LSC_RC_START() 
{ 

Packet * pkptr; 


FINCESC]Re START ()); 


pkptr = op_pk_create(0); 
op_pk_fd_-set(pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, MSG_LSC_RC_START, 

16); 

if (op_subq_pk_insert (RC_BUFFER, pkptr, OPC_QPOS_TAIL) != OPC_QINS_OK) { 
op_pk_destroy (pkptr) ; 

} 


FOUT ; 
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} 


void LSC_RC_STOP() 


{ 
Packet * pkptr; 


Peer oSC RC STOP () ) ; 


pkptr = op_pk_create(0); 
op_pk_fd_set (pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, MSG_LSC_RC_STOP, 
iG ).- 
if (op_subq_pk_insert(RC_BUFFER, pkptr, OPC_OPOS_TAIL) != OPC_OINS_OK) { 
op_pk_destroy(pkptr) ; 
} 


FOUT ; 
} 


void LSC_RC_RETRIEVE_BSNT () 


{ 
Packet * pkptr; 


FIN (LSC_RC_RETRIEVE_BSNT()); 


pkptr = op_pk_create (0); 
op_pk_fd_set (pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, 
MSG_LSC_RC_RETRIEVE_BSNT, 16); 
if (op_subq_pk_insert(RC_BUFFER, pkptr, OPC_QPOS_TAIL) != OPC_QINS_OK) { 
op_pk_destroy (pkptr); 
} 


FOUT; 
} 


void LSC_RC_RETRIEVE_FSNX () 


{ 
Packet * pkptr; 


Pe enoeenOlRe TR TEVE PsN ()) ; 


pkptr = op_pk_create(0); 
Speprera set (pkptr, FD INDEX IST, OPC_FIELD TYPE_INTEGER, 
MSG_LSC_RC_RETRIEVE_FSNX, 16); 
if (op_subq_pk_insert(RC_BUFFER, pkptr, OPC_OQPOS_TAIL) != OPC_QINS_OK) { 
op_pk_destroy(pkptr); 
} 


EOuUL: 
} 


void LSC_RC_REJECT_MSU_FISU() 


{ 
Packet * pkptr; 


BIN (osc RC REJECTIMSU_FISU()); 


Dkotr = Op _pk create()) ; 
op_pk_fd_set (pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, 
MSG_LSC_RC_REJECT_MSU_FISU, 16); 
if (op_subq_pk_insert(RC_BUFFER, pkptr, OPC_QPOS_ TAIL) != OPC_QINS_OK) { 
op_pk_destroy(pkptr) ; 
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FOUr- 
} 


VOld LSC RemAGCeCHPTeMCUSFISU () 


‘ 
Packet * pkptr; 


FIN USGeRnes ACCEPT MSU_FISU()): 


pkptr = op_pk_create(0); 
op_pk_fd_set(pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, 
MSG_LSC_RC_ACCEPT_MSU_FISU, 16); 
if (op_subq_pk_insert(RC_BUFFER, pkptr, OPC_QPOS_TAIL) != OPC_QINS_OK) { 
op_pk_destroy(pkptr) ; 
} 


FOUT; 
} 


void TXC_RC_FSNT(fsnt) 
itn shit ; 


{ 
Packet * pkptr; 


FIN¢CRXC RC OFSNT() )e 


Dkptr ="Op pk create (0): 
op_pk_fd_set(pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, MSG_TXC_RC_FSNT, 
I Ga)iey 
Op_pkK_ fad set (pkptr, FEDOINDEX_2ND, OPC_FIELD_TYPE_INTEGER, fsnt, 16); 
1f (op_subgq_pk_insert(RC_BUFFER, pkptr, OPC_OQPOS_TAIL) != OPC_QINS_OK) { 
op_pk_destroy(pkptr) ; 
} 


EOUT; 


void XXX_RC_CONGESTION_DISCARD ( ) 


{ 
Packet * pkptr; 


FIN (XXX_RC_CONGESTION_DISCARD()); 


pkptr = op_pk_create(0); 
op_pk_fd_set(pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, 
MSG_XXX_RC_CONGESTION_DISCARD, 16); 
if (op_subq_pk_insert(RC_BUFFER, pkptr, OPC_QPOS_TAIL) != OPC_QINS_OK) { 
op_pk_destroy (pkptr); 
} 


POUT * 
} 


void XXX_RC_CONGESTION_ACCEPT () 
{ 
Packet * pkptr; 
FIN (XXX_RC_CONGESTION_ACCEPT()); 


pkptr = op_pk_create(0); 
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op_pk_fd_set(pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, 
MSG_XXX_RC_CONGESTION_ACCEPT, 16); 
if (op_subgq_pk_insert(RC_BUFFER, pkptr, OPC_QPOS_TAIL) != OPC_QINS_OK) { 
op_pk_destroy (pkptr) ; 
} 


FOUL; 
} 


void XXX_RC_NO_CONGESTION () 


{ 
Packet * pkptr; 


FIN (XXX_RC_NO_CONGESTION () ) ; 


pkptr = op_pk_create(0); 
op_pk_fd_set(pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, 
MSG_XXX_RC_NO_CONGESTION, 16); 
if (op_subgq_pk_insert(RC_BUFFER, pkptr, OPC_OQPOS_TAIL) != OPC_QINS_OK) { 
op_pk_destroy(pkptr) ; 
} 


Four; 


/* define packet queuing functions for messages send to AERM */ 
void IAC_AERM_SET_Ti_To_Tie() 
{ 

Packet * pkptr; 


FIN (IAC_AERM_SET_Ti_To_Tie()); 


pkptr = op_pk_create(0); 
Gpepk fa Set (pkptr, FD_INDEX_iST, OPC_FIELD_TYPE INTEGER, 
MSG_IAC_AERM_SET_Ti_To_Tie, 16); 
if (op_subq_pk_insert (AERM_BUFFER, pkptr, OPC_OQPOS_TAIL) != OPC_OINS_OK) { 
op_pk_destroy(pkptr) ; 
} 


Bowl - 
} 


void LSC_AERM SET _Ti_To_Tin() 
{ 
Packet * pkptr; 


BIN (DSC _AERM_SET_Ti_To_Tin() )i; 


pkptr = op_pk_create(0); 
op_pk_fd_set(pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, 
MSG_LSC_AERM_SET_Ti_To_Tin, 16); 
if (op_subq_pk_insert (AERM_BUFFER, pkptr, OPC_QPOS_TAIL) != OPC_QINS_OK) { 
op_pk_destroy(pkptr) ; 
} 


FOUT; 
} 


void IAC_AERM_START() 
{ 
Packet * pkptr; 
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FIN (IAC_AERM_START()); 


pkptr = op_pk_create(0); 
op_pk_fd_set (pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, 
MSG_IAC_AERM START, 16); 
if (op_subq_pk_insert (AERM_BUFFER, pkptr, OPC_QPOS_TAIL) != OPC_QINS_OK) { 
op_pk_destroy (pkptr); 


POUT 
} 


void IAC_AERM_STOP() 
{ 
Packet * pkptr; 


PEN (EAC UAERM STOP ()); 


PkKptr = op _pkJcreate (0); 
op_pk_fd_set(pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, MSG_IAC_AERM STOP, 
16)% 
if (op_subq_pk_insert (AERM_BUFFER, pkptr, OPC_QPOS_TAIL) != OPC_QINS_OK) { 
op_pk_destroy(pkptr); 
} 


FOUL, 
} 


void DAEDR_AERM_SU_ERROR ({) 
{ 
Packet * pkptr; 


FIN (DAEDR_AERM_SU_ERROR () ) ; 


pkptr = op_pk_create(0); 
Ope pk faeset (pkptr, FRSINDEX VST, OPC FIELD TYPE_INTEGER, 
MSG_DAEDR_AERM SU_ERROR, 16); 
if (op_subgq_pk_insert (AERM_BUFFER, pkptr, OPC_QPOS_TAIL) != OPC_QINS_OK) { 
op_pk_destroy(pkptr) ; 


FOUL; 
} 


/* define packet queuing functions for messages send to SUERM */ 
void LSC_SUERM_START() 
{ 

Packet * pkptr; 


PEt LSC _SUBRM START (7); 


pkptr = op_pk_create(0); 
op_pk_fd_set(pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, 
MSG_LSC_SUERM_START, 16); 
if (op_subq_pk_insert(SUERM_BUFFER, pkptr, OPC_QPOS_TAIL) != OPC_QINS_OK) { 
op_pk_destroy(pkptr) ; 


FOUL: 


ae 7 
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void LSC_SUERM_STOP() 


1 
Packet * pkptr; 


Ptn(ise_ SUERM_STOP()); 


pkptr = op_pk_create(0); 
op_pk_fd_set (pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, 
MSG_LSC_SUERM_STOP, 16); 
if (op_subq_pk_insert (SUERM_BUFFER, pkptr, OPC_QPOS_TAIL) != OPC_QINS_OK) { 
op_pk_destroy(pkptr); 
} 


FOUT ; 
} 


void DAEDR_SUERM_SU_ERROR () 
{ 
Packet * pkptr; 


FIN (DAEDR_SUERM_SU_ERROR()); 


pkptr = op_pk_create(0); 
op_pk_fd_set (pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, 
MSG_DAEDR_SUERM_SU_ERROR, 16); 
if (op_subq_pk_insert (SUERM_BUFFER, pkptr, OPC_QPOS_TAIL) != OPC_QINS_OK) { 
op_pk_destroy(pkptr); 
} 


FOUT; 
} 


void DAEDR_SUERM_CORRECT_SU() 


{ 
Packet * pkptr; 


FIN (DAEDR_SUERM_CORRECT_SU()); 


pkptr = op_pk_create(0); 
Spepketa set (pkptr, FR_INDEXZUST, CPClFIEED TYPESINTEGER, 
MSG_DAEDR_SUERM_CORRECT_SU, 16); 
if (op_subq_pk_insert (SUERM_BUFFER, pkptr, OPC_QPOS_TAIL) != OPC_QINS_OK) { 
op_pk_destroy (pkptr) ; 
} 


EOUT >; 
} 


/* define packet queuing functions for messages send to CC */ 
void RC_CC_NORMAL () 
{ 

Packet * pkptr; 


FIN (RC_CC_NORMAL () ); 


pkptr = op_pk_create(0); 
op_pk_fd_set(pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, MSG_RC_CC_NORMAL, 
16); 
if (op_subq_pk_insert(CC_BUFFER, pkptr, OPC_QPOS_TAIL) != OPC_QINS_OK) { 
op_pk_destroy(pkptr) ; 
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EOuUT-: 
} 


void RC_CC_BUSY() 
{ 
Packet * pkptr; 


FIN(eeweesbusy()); 


DipeEr = Opmpk create(0); 
op_pk_fd_set(pkptr, FD_INDEX_1ST, OPC_FIELD_TYPE_INTEGER, MSG_RC_CC_BUSY, 
1S) i 
if (op_subq_pk_insert(CC_BUFFER, pkptr, OPC_QPOS_TAIL) != OPC_QINS_OK) { 
op_pk_destroy(pkptr) ; 
} 


mOul: 
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EK. EXECUTIVE FOR “init” STATE 


yi * SS SS SS SS SS SS 3 SS SS SS SS SSS SSB SS SS SS SS) SSS SS SS SS SSS SSS SS SS SS SS Se SS SS i * / 
/* Process Init State sa 
/* Signaling System 7 (SS7), Message Transfer Part Level 2 (MTP2) we) 
/-eeto-T, ©.703, Jul 1996 = 
v4 * ae ee ee ee a SS Se Se ee a ee ee ee ee SS See SS ae ee Se eS SS SS SSS SS SS SS SS SSS SSS S3S 252225255 S525 255=— * i 
{/* sSSSSessSSsrorrsrrrrseere sss te ss SSSSSSS SSS SSS SSS S2SSSSSSeseSeeesesce= * if 
/* (1) Retrieving of Process parameters ay 
/* sess Stess Sasser assessssersss2tSSses ese SsSsSSeSereseSSSeSeeeSeeeeeSeee===== * ‘i 


/* get queue module’s own object id and that of MTP3 */ 
Ownmeta, = op id self()- 
mtp3_id = op_id_from_name(op_topo_parent(own_id), OPC_OBJTYPE_QUEUE, "MTP3"); 


/* get assigned values for all the model attribute */ 
op_ima_obj_attr_get(own_id, “service_rate", &service_rate) ; 
Gpeimasco). attr get (own id, "Tin", &TPin); 
op_ima_obj_attr_get(own_id, "Tie", &Tie); 
op_ima_obj_attr_get(own_id, "T", &T); 

op_ima_obj_attr_get(own_id, "D", &D); 

op_ima_obj_attr_get(own_id, "N", &N); 

Op_ima_obj_attr_get(own_id, "M", &M); 

op_ima_obj_attr_get(own_id, "Timerl", &T1); 
op_ima_obj_attr_get(own_id, "Timer2", &T2); 
op_ima_obj_attr_get(own_id, "Timer3", &T3); 
Oop_ima_obj_attr_get(own_id, "Timer4_Pn", &T4_Pn); 
Op_ima_obj_attr_get(own_id, "Timer4_ Pe", &T4_Pe); 
op_ima_obj_attr_get(own_id, "Timer5", &T5); 
op_ima_obj_attr_get(own_id, "Timer6", &T6); 
Oop_ima_obj_attr_get(own_id, "Timer7", &T7); 
Op_ima_obj_attr_get(own_id, "LSC_service_time", &LSC_service_time) ; 
op_ima_obj_attr_get(own_id, "IAC_service_time", &IAC_service_time) ; 
op_ima_obj_attr_get(own_id, "POC_service_time", &POC_service_time) ; 
op_ima_obj_attr_get(own_id, "TXC_service_time", &TXC_service_time) ; 
op_ima_obj_attr_get(own_id, "“RC_service_time", &RC_service_time) ; 
op_ima_obj_attr_get(own_id, "AERM_service_time", &AERM_service_time) ; 
Oop_ima_obj_attr_get(own_id, "SUERM_service_time", &SUERM_service_time) ; 
op_ima_obj_attr_get(own_id, "CC_service_time", &CC_service_time) ; 


/ * a a a ee SS Se ee SS * / 
/* (2) Initiailization of Process variables cere 
ee ee ee ee ee ee ee eee ee ee ee 


/* convert service time from milliseconds to seconds */ 
LSC_service_time = LSC_service_time / 1000; 


IAC _service_time = IAC_service_time / 1000; 
POC_service_time = POC_service_time / 1000; 
TXC_service_time = TXC_service_time / 1000; 
RC_service_time = RC_service_time / 1000; 


AERM_service_time = AERM_service_time / 1000; 
SUERM_service_time = SUERM_service_time / 1000; 
CC_service_time = CC_service_time / 1000; 


/* define data class for the simulation log */ 
_iteal(own_id, strive 10); 


log_hdle_link_status = op_prg_log_handle_create ( 
OpC_Log_Category_Protocol, 
"MTP2 - Link Status", 
str 
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SYS_LINK_STARTUPSEOCSE LITE); 


/* define stataStic handle for link utilization */7 
link_utadizatrzon handle = op _stat_reg(“link utilization", 20PC STATA INDEXANONE, 
OPC «STAT LOCAL): 


/* Freie Ss] 

iCipEer_ external = op_ici_create("ss/_ici_fmt"); 
/* Si paeweimer se, 

dv_timerl.code = T1_EXPIRE; 

dv_timerl.delay = T1; 


dv_timer2.code = T2_EXPIRE; 
dv_timer2.delay = T2; 


dv_timer3.code = T3_EXPIRE; 
dv_timer3.delay = 13; 


dv_timer4.code = T4_EXPIRE; 
dv_timer4.delay = T4_Pn; 


dv_timer5.code = T5_EXPIRE; 
dv_timerS.delay = T5; 


dv_timer6.code = T6_EXPIRE; 
dv_timer6.delay = T6; 


dv_timer7.code = T7_EXPIRE; 
dv_timer7.delay = T7; 


/* initialize the states of all the functional blocks */ 


dv_LSC_state = STATE_LSC_POWER_OFF; 

dv_IAC_state = STATE_IAC_IDLE; 

dv_Poc_state =~.STATE POC lTDLE: 

dv_TXC_state —wSTATEaT*C IDLE: 

dv_RC_state = STATE_RC_IDLE; 

dv_AERM_ state = STATE_AERM_IDLE; 

dv_SUERM_state = STATE_SUERM_IDLE; 

dv_ccC_state = STATE_CC_IDLE; 

vf * a a i i a a a a i a hd ict 4 
/* (3) Power up link and processors and wait for START command from MTP3 */ 
/ * +--+ Ce ee =] 


/* start message processing for all functional blocks */ 
op_intrpt_schedule_self(op_sim_time() + LSC_service_time, LSC_MSG) ; 
op_intrpt_schedule_self(op_sim_time() + IAC_service_time, IAC_MSG); 
op_intrpt_schedule_self(op_sim_time() + POC_service_time, POC_MSG) ; 
op_intrpt_schedule_self(op_sim_time() + TXC_service_time, TXC_MSG) ; 
op_intrpt_schedule_self(op_sim_time() + RC_service_time, RC_MSG); 
op_intrpt_schedule_self(op_sim_time() + AERM_service_time, AERM_MSG) ; 
op_intrpt_schedule_self(op_sim_time() + SUERM_service_time, SUERM_MSG); 
op_intrpt_schedule_self (op_sim_time() + CC_service_time, CC_MSG) ; 


/* startestanaling Unit. transmission routine “7 
op_intrpt_schedule_self (op_sim_time() + 0.001, TXC_TRANS_COMPLETE) ; 


/* Enable transmission of Signaling Units */ 
trans_req = FALSE; 


/* Power up LSC, this is needed unless an external MGMT function */ 
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/* 


is implemented to start the link ay | 


MGMT_LSC_POWER_ON () ; 


F. 


fad 
/* 
yas 
/* 
rg 
pos 
| as 
fies 
Ves 
f= 
7 ies 
jie 
/* 
/* 
tees 


EXECUTIVE FOR “ext_msg” STATE 


ec ce re cre ce cr ce cc eg cc cc re ee ee err ee re ew ee we ee ewe ee we 
cmc cr cr crc cr er cre ee cr er ce cr cr ce cr cr ce wr cc cc cr ce ce ee ree we ee ee ee ee ee oe 


External Message Processing State 
Signaling System 7 (SS7), Message Transfer Part Level 2 (MTP2) 
frou-), ©O.703, Jul 1996 
Note: 
This state receives all incoming messages for MTP2. 
Messages here do not include SS7 Signaling Units. 
All Messages intended for this level are received here and 
being recognized as an interrupt with type "OPC_INTRPT_REMOTE". 


The "code" field of the interrupt are then retrieved to determine 


the message and if necessary, the “ici" field of the interrupt 
can also be read (if more data are also sent). 


All received messages are then queued into message buffer of the 


respective functional block for processing. 


ome me ce cc ce ec ee re em ec cc ee ee ee ec ce ce ee ee ce we ew ee we we we we we we we we we oe 
ere cm mc mmm cee em ee ce ce ee ee ce ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee eee ee we oe 


fespewernputc = OD _IntEYrpe ici () ; 
Swueen op intrpt_code()) {¢ 


case MSG_LSAC_LSC_START: 
LSAC_LSC_START () ; 
break; 


case MSG_LSAC_LSC_STOP: 
LSAC_LSC_STOP(); 
break; 


case MSG_LSAC_LSC_EMERGENCY : 
LSAC_LSC_EMERGENCY () ; 
break; 


case MSG_LSAC_LSC_EMERGENCY_CEASES: 
LSAC_LSC_EMERGENCY_CEASES(); 
break; 


case MSG_LSAC_LSC_LOCAL_PRO_OUTAGE: 
LSAC_LSC_LOCAL_PRO_OUTAGE () ; 
break; 


case MSG_LSAC_LSC_LOCAL_PRO_RECOVERED: 
LSAC_LSC_LOCAL_PRO_RECOVERED () ; 
break; 


case MSG_LSAC_LSC_FLUSH_BUFFERS: 
LSAC_LSC_FLUSH_BUFFERS () ; 
break; 


case MSG_LSAC_LSC_CONTINUE: 
LSAC_LSC_CONTINUE () ; 
break; 


case MSG_TCOC_LSC_RETRIEVE_BSNT: 
TCOC_LSC_RETRIEVE_BSNT (); 
break; 


case MSG_TCOC_LSC_RETRIEVAL_REQ_FSNC: 
TCOC_LSC_RETRIEVAL_REQ_FSNC (); 
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break; 


case MSG _MGMT_LSC_POWER_ON: 
MGMT_LSC_POWER_ON (); 
break; 


case MSG_MGMT_LSC_LEVEL3_FAILURE: 
MGMT_LSC_LEVEL3_FAILURE(); 
break; 


case MSG_MGMT_LSC_LOCAL_PRO_OUTAGE: 
MGMT_LSC_LOCAL_PRO_OUTAGE(); 
break; 


case MSG_MGMT_LSC_LOCAL_PRO_RECOVERED: 
MGMT_LSC_LOCAL_PRO_RECOVERED (); 
break; 


case MSG_XXX_ RC_CONGESTION_DISCARD: 
XXX_RC_CONGESTION_DISCARD(); 
break; 


case MSG_XXX_RC_CONGESTION_ACCEPT: 
XXX_RC_CONGESTION_DISCARD(); 
break; 


case MSG_XXX_RC_NO_CONGESTION: 


XXX_RC_NO_CONGESTION (); 
break; 
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Gc EXECUTIVE FOR “TXC_rev” STATE 


/* service the interrupt by acquiring the arriving packet */ 
/* multiple arriving streams are supported. */ 


pkptr = op _ pk cet (cplintrpt_strm ())); 


/* attempt to enqueue the packet at tail */ 
/* of subqueue 0. wey 
bt (avetxcC state = STATE TXC_IN_ SERVICE) -{ 
if (op_subq_pk_insert (TRANSFER_BUFFER, pkptr, OPC_QPOS_TAIL) == 
OPC_OINS_OK) { 
av_TXC Cm = dv@ixe Cm + 1; 
} 


else { 


/* the inserton failed (due to toa ay 
/* full queue) deallocate the packet. */ 
op_pk_destroy (pkptr); 
} 
} 
else { 
/* TXC not ready yet, discard packet */ 
op_pk_destroy(pkptr) ; 


2) 


Hos 
Viess 
i 
/* 
y boss 
/* 
7 * 


EXECUTIVE FOR “TX_MSU” STATE 


S53) SS SS) SS SS SS SS SS SS SS SS SSS SSS SS SS) SS SS S58 St SS SS SS Sara SS SS SS SS SS SS SS BS BSS SS SS SS St St tt * / 

Basic Transmission Control (TXC) ay 

Signaling System 7 (SS7), Message Transfer Part Level 2 (MTP2) er /. 

Note: a 
This defines the processing of MSUs from layer 4 and also the a) 
creation of Link Status Signal Units and Fill In Status Units a 
as defined in ITU-T 0.703 (Jul 96), x / 

i re he * / 

Unlike standard SS7 where transmission requests are send by */ 

the DAEDT function block. "trans_regq" is set = / 

whenever a transmission is needed completed. */ 

LSSUs has the highest priority, followed by MSUs from RTB, a | 

MSUs from TB and when there is nothing FISU is send = 

This means that whenever transmission is request, a SU is ie, 

always sent af 

((trans_req) && (dv_TXC_state == STATE_TXC_IN_SERVICE)) { 


/* new transmission is requested again. */ 
trans_req = FALSE; 


(dv_TXC_state == STATE_TXC_IN_SERVICE) { 


/* Send LSSU first whenever there is one, else try to send a MSU */ 
if (dv_TXC_LSSU_available_flag) { 


/* set SU type to send to LSSU */ 
SU_type_to_send = LSSU; 


/* stop future LSSU transmission is link is busy */ 
if (dv_TXC_status_indication == LINK_STATUS_BUSY) { 
dv_TXC_LSSU_available_flag = FALSE; 
} 
} 


else { 


/* try to send MSU either from RTB or TB unless it is inhibited */ 
LE (dveTxe- MSUSinhibited flag) 4 


/* set SU type to send to FISU */ 
SU_type_to_send = FISU; 
} 


else { 


/* FSNT is always the same as FSNL unless it is changed by a NACK. */ 
/* if a negative acknowledgement is received making FSNT not equal */ 
/* to FSNL, send MSUs from RTB and keep doing it for next request */ 


/* till all has been sent a 
Ht (dv_TXClPSNl == dv ine erone) { 

/* try to send MSU from TB. vars 

/* sSend FISU “if “tt aseempty Or RTS is full, */ 

Lt) (dy _TXC Om —= 10) | | (dveTxXC_ RIB fuldetlag)) { 


/* set SU type to send to FISU *7 
SU_type_to_send = FISU; 


of 


else { 


/* teteh MSU pdu from TB */ 
pkptr_tx_pdu = op_subg_pk_remove (TRANSFER_BUFFER, 
OPC_QPOS_HEAD) ; 


/* decrement counters and incrment sequence */ 

/* numbers since this is a new MSU a 
dv_TXC_Cm = dv_TXC_Cm - 1; 

dv_TXC_FSNL = mtp2_increment (dv_TXC_FSNL, 1, MOD_SN); 
dv TXC _FPSNT = dy _TXC ESN: 


/* if this is the lst MSU */ 
Tee laverKe FSNL == dy ie FSNE) < 
mtp2_timer_start (&dv_timer?7) ; 


} 


/ = SEOnre MSU pau tork ls a / 
op_subq_pk_insert (RETRANSMISSION_BUFFER, 
Op pk Copy (pkpEr tx pdu). OFC OFOS TAIL) ; 


/* send the FSNT value to receiver control */ 
PAE rRe FSNT (av srec FSNT) ; 


/* set RTB full flag if RTB is going to be */ 

/* full after this transmission le 

if (dv_TXC_FSNL == mtp2_decrement (dv_TXC_FSNF, 2, MOD_SN)) { 
aveaixe Ris full flag = TRUE; 

} 


/* set SU type to send to MSU */ 
SU_type_to_send = MSU; 
} 


} 
else { 


/* send MSU from RTB */ 
dy TxXC FSNI.= mtp2_increment (dv_TXC_FSNT, 1 MODES). 


/* fetch MSU pdu from RTB */ 

pkptr_tx_pdu = op_subq_pk_remove (RETRANSMISSION_BUFFER, 
OPC_QPOS_HEAD) ; 

/* send the FSNT value to receiver control */ 

TXC_RC_FSN@ayveaTxXC oFSNTD). 

/* set SU type to send to MSU */ 

SU_type_to_send = MSU; 


} 


/* assign BSNT, BIBT and FIBT */ 

dv_TXC_BSNT = mtp2_decrement (dv_TXC_FSNX, 1, MOD_SN); 
ave TXCeBosple= dv) .CaBle- 

dv_TXC_FIBT dvarxC FIB- 


/* create the SU */ 

DKpEY_tx = op pk ®ereate (0); 

Gpeepk £4 SG (Dpkpteret«, sD eINDExelsT Orca FrIELD TYPESZNTEGER, FLAG, 
FD_LEN_FLAG) ; 

Op _pk_fd_set (pkptr_tx, FD_INDEX ZN CRGeEGELD “IM PE_ INTEGER, dv_TXC_BSNT, 
FD_LEN_BSN) ; 
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Op pk stdeset (pkptr_ tx, FDL INDEX 23RD, OPCerIELDetTYPE INTEGER wave cable. 


FD_LEN_BIB) ; 
op_pk_fd_set (pkptr_tx, FD_INDEX_4TH, OPC_FIELD_TYPE_INTEGER, dv_TXC_FSNT, 
FD_LEN_FSN) ; 
op_pk_fd_set(pkptr_tx, FD_INDEX_STH, OPC_FIELD_TYPE_INTEGER, dv_TXC_FIBT, 
FD_LEN_FIB); 
switch (SU_type_to_send) { 
case FISU: 


jeorm FISU *7 

op_pk_fd_set (pkptr_tx, FD_INDEX_6TH, OPC_FIELD_TYPE_INTEGER, 
FD_LEN_L1) ; 

op_pk_fd_set(pkptr_tx, FD_INDEX_7TH, OPC_FIELD_TYPE_INTEGER, 
FD2GENS CK): 

op_pk_fd_set(pkptr_tx, FD_INDEX_8TH, OPC_FIELD_TYPE_INTEGER, 
FD_LEN_FLAG) ; 

break; 


case LSSU: 

/* £o0rm LSSU */ 

i = FD_LEN_SF/8; 

op_pk_fd_set(pkptr_tx, FD_INDEX_6TH, OPC_FIELD_TYPE_INTEGER, 
FD LEN Ul) ; 

Op pk ftdiset (pkptrecx, sh DeINDEX_ 71H, OPG=rIEEb=lyYPEsINTEGER, 
dv_TXC_status_indication, FD_LEN_SF) ; 

op_pk_fd_set(pkptr_tx, FD_INDEX_8TH, OPC_FIELD_TYPE_INTEGER, 
BD” CENSCK); 

Op_pk_fd_set(pkptr_tx, FD OINDEX_9TH™ OPC_FIELD_TYPE_INTEGER, 
FD_LEN_FLAG) ; 

break; 


case MSU: 

Je BEOrn. MSU c= / 

iv OpspK totalasizesget (pkptr_ tx pdu)/3s; 

op_pk_fd_set (pkptr_tx, FD_INDEX_6TH, OPC_FIELD_TYPE_INTEGER, 
FDO LENSLEL).. 

Gp pk _EG_SeCE(PKPEr Ex SED INDEX 7TH, OPGSr TEL TYPE PACKET, 
pkptr_tx pdu, FDOLEN  PbuU); 

op_pk_fd_set (pkptr_tx, FD_INDEX_8TH, OPC_FIELD_TYPE_INTEGER, 
FD_LEN_CK) ; 

Op pK fd set (pkpeEr tx, FD _INDEX 2TH Ores LEre ol yrE INTEGER, 
FD_LEN_FLAG) ; 

break; 


} 


/* determine the packets length (in bits) */ 
SU_len = opmpk@total size get (pkptr_tx) ; 

/* determine the time required to complete */ 
/* transmission of the packet ie’ 
SU_tx_time = SU_len / service_rate; 


/* schedule an interrupt for this process */ 
/* to simluate this transmission delay heel, 


i, 


FLAG, 


FLAG, 


op_intrpt_schedule_self (op_sim_time() + SU_tx_time, TXC_TRANS_COMPLETE) ; 


/* activate the transmission flag to ensure */ 
/* that SU is sent at end of delay */ 
trans_req = TRUE; 


/* forward the copied packet on stream 0, causing */ 


/* an immediate interrupt at destination. </ 
op_pk_send(pkptr_tx, STREAM _MTP2_LOW_LEVEL_OUT) ; 
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| EXECUTIVE FOR “TXC” STATE 


ee a ee eS SS SS SS SS SSS 
/* Basic Transmission Control (TXC) a A 
/* Signaling System 7 (SS7), Message Transfer Part Level 2 (MTP2) = 
/* Note: 7 
fie This defines all TXC processing which includes handling of eof: 
[ie incoming internal messages and timer expiry. ef 
/* Messages are proccessed in FIFO order. aay 
as Each message is processed according to the algorithm oe 
le as defined in ITU-T 0.703 (Jul 96), Fig 13. a / 
eae a a ee a ee a ee eS ee a ae ee ee ee ee oS / 


switch (oOpointrpt#eode()) f 
case TXC_MSG: 


/* If incoming message exists, remove the message packet */ 


/* from the buffer and process it 


/* The first field in each packet is always the message */ 


/* code, it can be followed by one or more fields 
/* depending on the message 


if (!op_subq_empty(TXC_BUFFER)) { 


pkptr = op_subq_pk_remove (TXC_BUFFER, OPC_QPOS_HEAD) ; 


op_pk_fd_get(pkptr, FD_INDEX_1ST, &msg_code); 
switch (msg_code) { 


case MSG_LSC_TXC_START: 
if (dv_TxXC state == STATE [Ec IDLE) { 
dv_TXC_LSSU_available_flag = FALSE; 
dv_TXC_SIB_received_flag = FALSE; 
dv TAC _ RIB fullltlacg, = FAUSE; 
dv_TXC_MSU_inhibited_flag = FALSE; 
aveTxXC -FSNe = Tae; 


dv_TXC_FSNT = 127; 
dv_TXC_FSNX = 0; 
dv_TXC_FSNF = 0; 
dv_TXC_FIB = 1; 
dv_TXC_BIB = 1; 
dv_TXC_Cm = 0; 


op_subq_flush(TRANSFER_BUFFER) ; 
op_subq_flush (RETRANSMISSION_BUFFER) ; 
dv_TXC_state = STATE_TXC_IN_SERVICE; 


op_prg_log_entry_write(log_hdle_link_status, "TXC: state 


IDLE->IN_SERVICE, instructed by LSC"); 
} 


else if (dv_TXC_state == STATE TXC_IN SERVICE) ({ 


dv_TXC_SIB_received_flag = FALSE; 
avoBxXC RTB full_ftlag = FALSE; 
dv_TXC_MSU_inhibited_flag = FALSE; 
dvlTxXeC_FSNL w=si20- 


dv_TXC_FSNT = 127; 
Gy DXe sr SNX = 0; 
avo tXe SNE 0; 
av TXAC Fibs. 
dv__TX¢ BIB =e, 
Qve TAC (Cm = 0; 


op_subq_flush (TRANSFER_BUFFER) ; 
op_subq_flush (RETRANSMISSION_BUFFER) ; 
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break; 
case MSG_LSC_TXC_SEND_SIOS: 


/* T7, timer for excessive acknowledgement is not needed */ 
/* as these SUs do not required acknowledgements Be: 
If Cay TXC State == STATE -TXG. IN SERVICE), ¢ 
mtp2_timer_stop (&dv_timer7) ; 
dv_TXC_LSSU_available_flag = TRUE; 
dv_TXC_status_indication = LINK_STATUS_OUT_SERVICE; 
op_prg_log_entry_write(log_hdle_link_status, "TXC: Sending 
SIOS w-amstructed by LSC"); 
} 


break; 
case MSG_LSC_TXC_SEND_SIPO: 


/* T7, timer for excessive acknowledgement is not needed */ 
/* as these SUs do not required acknowledgements ie 
if (adv_TXC_state == STATE_TXC_IN_SERVICE) { 
mtp2_timer_stop(&dv_timer7) ; 
dv_TXC_LSSU_available_flag = TRUE; 
dv_TXC_status_indication = LINK_STATUS_PROCESSOR_OUTAGE ; 
op_prg_log_entry_write(log_hdle_link_status, "TXC: Sending 
SiPO,wainstructed by Ese") 
} 


break; 


case MSG_IAC_TXC_SEND_SIO: 
if (dv_TXC_state == STATE_TXC_IN_SERVICE) { 
dv_TXC_LSSU_available_flag = TRUE; 
dv_TXC_status_indication = LINK_STATUS_OUT_ALIGNMENT; 
op_prg_log_entry_write(log_hdle_link_status, "TXC: Sending 
SiO, instructed by IAG; 
} 


break; 


case MSG_IAC. TXC_SEND_SIN: 
if (dv_TXC state == STATE TXC _IN_SERVIGE) 1 
dv_TXC_LSSU_available_flag = TRUE; 
dv_TXC_status_indication = LINK_STATUS_NORMAL; 
op_prg_log_entry_write(log_hdle_link_status, “TXC: Sending 
SIN, instructed by IAG ™); 
} 


break; 


case MSG_IAC_TXC_SEND_SIE: 
if (dv_TXC_state == STATE_TXC_IN_SERVICE) { 
dv_TXC_LSSU_available_flag = TRUE; 
dv_TXC_status_indication = LINK_STATUS_EMERGENCY ; 
op_prg_log_entry_write(log_hdle_link_status, "TXC: Sending 
SIE, instructed by IAC"); 
} 


break; 


case MSG_CC_TXC_SEND_SIB: 
if (dv_TXC_state == STATE_TXC_IN_SERVICE) { 
dv_TXC_LSSU_available_flag = TRUE; 
dv_TXC_status_indication = LINK_STATUS_BUSY; 
op_prg_log_entry_write(log_hdle_link_status, "TXC: Sending 
SIBp;matistructea by CC"); 
} 
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break; 
case MSG_LSC_TXC_SEND_FISU: 


/* T7, timer for excessive acknowledgement is not needed */ 
/* as these SUs do not required acknowledgements ay 
if (dv_TXC_state == STATE_TXC_IN_SERVICE) { 
mtp2_timer_stop(&dv_timer7) ; 
dv_TX¢C_MSUsSinhibited_flag =STRUE; 
dv_TXC_LSSU_available_flag = FALSE; 
op_prg_log_entry_write(log_hdle_link_status, "TXC: Sending 
Blovmonly, “instructed by LSC"); 
i 


break; 
case MSG_LSC_TXC_SEND MSU: 


/* transmit MSU from transfer buffer if RTB is empty */ 
if (dv_TXC_state == STATE_TXC_IN_SERVICE) { 


/* check whether RTB is empty */ 

if (dv_TXC_FSNL != mtp2_decrement (dv_TXC_FSNF, 1, MOD_SN)) { 
mtp2_timer_start (&dv_timer7) ; 

} 

dv_TXC_MSU_inhibited_flag = FALSE; 

dv_TXC_LSSU_available_flag = FALSE; 

op_prg_log_entry_write(log_hdle_link_status, "TXC: Sending 

MSU if any, instructed by LSC"); 


/* init statistic calculation variables */ 
start_time = op_sim_time(); 
total bits-rev = 0. 

} 

break; 


case MSG_RC_TXC_SENDENACK: 


/* send NACK by inverting the BIB bit */ 
if (dv_TXC_state == STATE_TXC_IN_SERVICE) { 
if. (dete BIB == lye 
av _TXC BIB = %0F 
} 
else { 
avy TAC Breeavis 
} 
op_prg_log_entry_write(log_hdle_link_status, "TXC: Sending 
NACK, instructed by RC"); 
} 


break; 


case MSG_RC_TXC_SIB_RECEIVED: 


/* the receiver RC has receoved SIB from remote SP was 
/* if this is the first time, start congestion timer, */ 
/* T6 else start T7, excessive acknowledgment timer ae 
if (dy TXC state == STATE-7TxXCo mi SERVGGE ae 


if (!dv_TXC_SIB_received_flag) { 
mtp2_timer_start (&dv_timer6) ; 
dv_TXC_SIB_received_flag = TRUE; 


} 
mtp2_timer_start (&dv_timer7) ; 


| 


break; 


case MSG_RC_TXC_BSNR_AND_BIBR: 
if (dv_TXC_state == STATE_TXC_IN_SERVICE) { 
op_pk_fd_get(pkptr, FD_INDEX_2ND, &dv_TXC_BSNR) ; 
op_pk_fd_get (pkptr, FD_INDEX_3RD, &dv_TXC_BIBR) ; 


/* BSNR gives the value of the last acknowledged MSU sé 
/* I£ 1st MSU in the RTB is not the last acknowledged MSU */ 
if (dv_TXC_FSNF != mtp2_increment (dv_TXC_BSNR, 1, MOD_SN)) { 


/* stop congestion timer since new MSUs has been received */ 
if (dv_TXC_SIB_received_flag) { 
dv_TXC_SIB_received_flag = FALSE; 
mtp2_timer_stop(&dv_timer6) ; 


} 


/* erase in RTB, MSU’s from latest up to FSN = BSNR */ 
/* i.e. stop when FSNF = BSNR + 1 =] 
While (dv_TXC_FSNF != mtp2_increment (dv_TXC_BSNR, 1, 
MOD_SN)) { 
if (!op_subq_empty (RETRANSMISSION_BUFFER)) { 
op_subq_pk_remove (RETRANSMISSION_BUFFER, 
OPC_OQPOS_HEAD) ; 
} 
dv_TXC_FSNF = mtp2_increment (dv_TXC_FSNF, 1, MOD_SN); 
} 


/* if RTB is empty */ 
if (dv_TXC_FSNL != mtp2_decrement (dv_TXC_FSNF, 1, MOD_SN) ) 


mtp2_timer_start (&dv_timer7) ; 
} 
else { 
mtp2_timer_stop (&dv_timer?7) ; 
} 
dv_ THE: RTB_ fumes flag = FALSE; 
} 


/* if negative acknowledgment has been received / 
/* shift FSNT counter to activate a retransmiision loop */ 
/* during next transmission cycle ba 
/* First transmitted MSU from RTB will be FSNF af 
1£ (dvy_TXC_FIB != adv_TXC_BIBR) { 


/* stop congestion timer since new MSUs has been received */ 
if (dv_TXC_SIB_received_flag) { 
dv_TXC_SIB_received_flag = FALSE; 
mtp2_timer_stop (&dv_timer6) ; 
} 
dv_TXC_FIB = dviTxXC_ BIBR; 
adv _TXC_FSNT = dv_TxXC FSNE — a 
) 
} 


break; 


case MSG_RC_TXC_FSNX: 
if (dv_TXC_state == STATE_TXC_IN_SERVICE) { 
op_pk_fd_get (pkptr, FD_INDEX_2ND, &dv_TXG_FSNX) ; 
} 


break; 
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case MSG_LSC_TXAC_RETRIEVAL_REO_FSNC: 
if (dv_TxC_state == STATE_TXC_IN_SERVICE) { 


OPC_OPOS_HEAD) ; 


OPC_QPOS_HEAD), 


op_pk_fd_get (pkptr, FD_INDEX_2ND, &dv_TXC_FSNC) ; 


/* erase in RTB MSUs up to FSN = FSNC */ 
while (dv_TXC_FSNF != mtp2_increment (dv_TXC_FSNC, 1, MOD_SN) ) 


if (!op_subq_empty (RETRANSMISSION_BUFFER)) { 
op_subg_pk_remove (RETRANSMISSION_BUFFER, 


} 
dv_TXC_FSNF = mtp2_increment (dv_TXC_FSNF, 1, MOD_SN); 


} 


/* send Msu messages from RTB to level 3 */ 
/* from FSN = FSNF up to FSN = FSNL a 
while (dv_TXC_FSNF != mtp2_increment (dv_TXC_FSNL, 1, MOD_SN) ) 


if (!op_subq_empty (RETRANSMISSION_BUFFER)) { 
op_pk_deliver (op_subgq_pk_remove (RETRANSMISSION_BUFFER, 


mtp3_id, mtp3_retrieve_input_stream) ; 


} 
dv_TXC_FSNF = mtp2_increment (dv_TXC_FSNF, 1, MOD_SN); 


} 


/* send Msu messages from TB to level 3 */ 
while (dviTxXC_Cm §=0)e4 
if (!op_subq_empty (TRANSFER_BUFFER)) { 
op_pk_deliver (op_subq_pk_remove (TRANSFER_BUFFER, 


OPC_OPOS_HEAD), mtp3_id, mtp3_retrieve_input_stream) ; 


} 
dv_TXC.Cm = dv_TxXC Cm — i; 


} 
dv_TXC_RTB_full_flag = FALSE; 


/* send retrieval complete */ 
mtp2_send_external_msg (mtp3_id, 


MSG_TXC_TCOC_RETRIEVAL_COMPLETE, 0, iciptr_external) ; 


retrieval, 


Flushed, 


} 


dv_TXC_FSNL = dv_TXC_FSNC; 
dVer AG. SNT == dv XC ronL: 
op_prg_log_entry_write(log_hdle_link_status, "TXC: MSU 


as instructed by LSC"); 


break; 


case MSC_LSC_TAC_FLUSH_BUFFERS: 
1f (dv_TXC_state == STATE_TXC_IN_SERVICE) { 


/* clear RTB and TB */ 
op_subq_flush (RETRANSMISSION_BUFFER) ; 
op_subgq_flush (TRANSFER_BUFFER) ; 


adv _TXC_RTSB fullotiage= FALSE: 

av. TXCc. cm = QO; 

dv_TXC_FSNF = mtp2_increment (dv_TXC_BSNR, 1, MOD_SN); 
dv_TXC_FSNL dv_TXC_BSNR; 

dv_TXC_FSNT = dv_TXC_BSNR; 

mtp2_timer_stop (&dv_timer7) ; 
op_prg_log_entry_write(log_hdle_link_status, "TXC: Buffers 


as instructed by LSC"); 


} 
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/* 


break; 


} 
op pk destroy (pkptr: 


schedule next internal message processing interrupt */ 


op_intrpt_schedule_self(op_sim_time() + TXC_service_time, TXC_MSG) ; 
break; 


case T6_EXPIRE: 


/* 
in 


} 


Process expiry of T6, Remote Congestion Timer */ 

(dv_TXC_state == STATE_TXC_IN_SERVICE) { 
TXC_LSC_LINK_FAILURE() ; 

dv_TXC_SIB_received_flag = FALSE; 

mtp2_timer_stop(&dv_timer7) ; 

Oop_prgmlog_entry_wmilite (log_hdle_link status, “"TXC: 26 Expire"); 


break; 


case T7_EXPIRE: 


/* 
sige 


Process expiry of T7, Excessive delay in Acknowldegement Timer */ 
(av TXC state == STATE TXCLIN SERVICE, -{ 

TXC_LSC_LINK_FAILURE(); 

mtp2_timer_stop (&dv_timer6) ; 

dv_TXC_SIB_received_flag = FALSE; 

av_TXC_state = STATE_TXC_IN_SERVICE; 
op_prg_log_entry_write(log_hdle_link_status, "TXC: T7 Expire, excess 


delay in ACK"); 


} 


break; 
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J; EXECUTIVE FOR “RC_rev” STATE 


(Ape = SS SS SS SS SS SS SS = ee Se eS ees vf 
/* SU receiving state for Basic Reception Control (RC) ney 
/* Signaling System 7 (SS7), Message Transfer Part Level 2 (MTP2) ie 
NOE Se: Ff 
/* This process does the following tasks: sls 
/* (1) Retrieve the packet and clear in from the input stream. sy) 
/* (2) Allocate errors to the incoming packets to simulate error aay! 
eg occuring in a SS7 link. Zero Error models are assume in the oF 
isi pipeline stages. sa 
/* (3) If the packet is deemed to be correct, each message are ay, 
ies processed according to the algorithm as defined in lt f 
Vs ITU-T 0.703 (Jul 96), Fig 14. Basic Reception Control Bop 
ee ee ee a 
hei i ee ee eee ee * i 
/* (1) Retrieving packet from input stream a: 
i * SSS SS SS S52 2 SS SS Se SSS SS SS SSS SS Se ee ee eee ee ee ee eS See Se ee Se eee Se ee See ee eee ee ee = * 7 
Ekptzers = Op _pk_get (op _intrpt _strm ()); 

fas eee ee a ae a eo a oe a a a7) 
/* (2) Allocate link errors a 
His —— oo a a a oe “rd 


/* zero error algorithm used at the moment */ 
/* This two function can be modified to simulate non error free links */ 
packet_no_error = DAEDR(pkptr_rx); 


/* Sq S$ Sh SS SS SS SS SS SF SS S$ SS i SS SS SS BS it thet asi SS SS SS * 1 
/* (3) Process packet if packet is deemed to be error free from DAEDR af 
ial a a a a a a  —  —— e —P——— — — * 7 


/* processed the packet according to the state and packet type */ 
if (packet_no_error) { 
Switch (dv_RC_state) { 
case STATE_RC_IDLE: 
op_pk_destroy(pkptr_rx) ; 
break; 


case STATE_RC_IN_SERVICE: 


/* get the header fields from the packet and destroys it */ 
op_pk_fd_get (pkptr_rx, FD_INDEX_2ND, &dv_RC_BSNR) ; 
Op_pk_fd_getipkptr_rx, FD_INDEX=SRD, “av RC BIER) ; 
op_pk_fd_get(pkptr_rx, FD_INDEX_4TH, &dv_RC_FSNR) ; 
op_pk_fd_get (pkptr_rx, FD_INDEX_5TH, &dv_RC_FIBR) ; 
op_pk_fd_get (pkptr_rx, FD_INDEX_6TH, &dv_RC_LI); 


/* LSSU has LI equals to 1 or 2, MSU has LI > 2 */ 
if ((dv_RC_LI == 1) || (dv_RC_LI == 2)) { 
ep _pk_fd_get (pkptr_rx, FDLINDEX_7TH, &dv_RC_status_indication) ; 
} 
elise 1f (@yiRC_ LI > 2) { 
op_pk_fd_get (pkptr_rx, FD_INDEX_7TH, &pkptrorx_pdu); 
} 
op2pk destroy (pkptr_rx) ; 


/* if Signal Unit received is a LSSU */ 
GE (UdveRe br == 1) | | “aveResrure—— 2) yt 


10] 


switenh (dv_RC status_indicatzon) 


} 
} 


else { 


/* 
age, 


case LINK_STATUS_NORMAL: 
RC_LSC_SIN Oe 
RGeiAC SIN OF 
break; 


case LINK_STATUS_EMERGENCY : 
RC_LSC_SIE(); 
RGPPAC SIE); 
break; 


case LINK_STATUS_OUT_ALIGNMENT : 
RG_LSGes lot) 
RC_IAC S100] 
break; 


case LINK_STATUS_OUT_SERVICE: 
RC_LSC_SIOS(); 
RC_IAC_ SIOS(); 
break; 


case LINK_STATUS_PROCESSOR_OUTAGE: 
RC_LSC_SIPO(); 
break; 


case LINK_STATUS_BUSY: 


RC_TXC_SIB_RECEIVED (); 
break; 


check for valid BSNR */ 


(is _BSNR_valid(dv_RC_FSNF, dAv_RC_FSNT, dv_RC_BSNR)) { 
/* valid BSNR received, if previous SU has abnormal BSNR ue 
/* mark this as a first time recovery, but still discard SU */ 
if (dv_RC_abnormal_BSNR_flag && (dv_RC_UNB != 1)) { 

adv_RC_UNB = 1; 
} 
else { 


/* valid BSNR received, if previous SU has abnormal BSNR */ 
/* and this is 2nd time recovery, confirm recovery, reset */ 
/* abnormal BSNR flag and continue to check th SU xy 
if (dv_RC_abnormal_BSNR_flag && (dv_RC_UNB ==1)) { 
dv_RC_abnormal_BSNR_flag = FALSE; 


if (dv_RC_FIBR = dv_RC_FIBX) { 
/* normal FIBR detected, if previous SU has abnormal */ 


/* FIBR set recovered from abnormal FIBR, ie. UNF to */ 
/* Je but strul adiacetra the signal unit. ff this is Dy, 


/* the second correct FIBR after an abnormal FIBER, itd 
/* confirm that this is good recovery and continue to */ 
/* process SU Fy, 
if ((dv_RC_abnormal_FIBR_flag) && (dv_RC_UNF != 1)) { 


/* 1st time recovery from abnormal FIBR, */ 
/* still reject the SU a 
dv -RG.UNE s=2 1; 
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} 


else { 


Te 
if 


} 


2nd time recovery, clear abnormal FIBR flag */ 
((dv_RC_abnormal_FIBR_flag) && (dv_RC_UNF == 1)) { 
dv_RC_abnormal_FIBR_flag = FALSE; 


RO LSC] FisusMSUSRECEIVED( ): 
RC_TXC_BSNR_AND_BIBR(dv_RC_BSNR, dv_RC_BIBR); 
dv_RC_FSNF = mtp2_increment (dv_RC_BSNR, 1, MOD_SN) ; 


/* 
fe 
sik 


process the MSU/FISU if RC is in accept MSU/FISU */ 
mode as controlled by LSC, else discard it bat & 
(dv_RC_MSU_FISU_accepted_flag) { 


/* if RC is in congestion discard mode discard es 
/* the SU but mark it for retransmission check aay: 
/* by Tx Lal é 
if (dv_RC_congestion_discard_flag) { 

re “Ive RC LI > 2) { 

GveRecenrR = |: 

} 

REZGGe BUSY (); 
} 
else { 


/* check for valid MSU */ 
if (dv_RC_FSNR == dv_RC_FSNX) { 
Te 1Cdyv RCO +72) 04 


/* valid MSU, £orward it to level 3 */ 
total: bits -scyv = totale bircs urcy —+ 


op_pk_total_size_get (pkptr_rx_pdu) + 32; 


op_stat_write(link_utilization_handle, 


total_bits_rcv/ (op_sim_time() - start_time) ); 


op_pk_send(pkptr_rx_pdu, 


STREAM_MTP2_HIGH_LEVEL_OUT) ; 


MOD_SN); 


dv_RC_FSNX = mtp2_increment (dv_RC_FSNX, 1, 


dv_RC_RTR = 0; 
if (dv_RC_congestion_accept_flag) { 


RC CCT BUSY) 
} 
else { 
RC_TXC_FSNX (dv_RC_FSNX) ; 
} 
} 
else { 


/* invalid SU, ask TXC to send NACK */ 
if (dv_RC_congestion_accept_flag) { 
ReEsGeCeBUSY (); 
} 
else { 
RC_TXC_SEND_NACK () ; 
GvaRCORTR = 1; 


/* invert FIBX since own TXC will */ 
/* invert BIB and the remote TXC ae 
/* when will used the new BIB as y 
/* FIB, when it receives the NACK */ 
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ie B(GyV ROLE IBEX, == ake 
Qyv. Re Fipx = 70- 

} 

else { 
eue (565 21096 ae 


} 


} 
} 
else if (dv_RC_FSNR != mtp2_decrement (dv_RC_FSNX, 
1, MODSSN)) { 


J anv hr SU 7 
/* get TXC to send NACK since this is nota 
valid FISU */ 


if (dv_RC_congestion_accept_flag) { 
RGe CGEeBUSY (jm 
i 
else { 
RC_TXC_SEND_NACK () ; 
dv RCERIRs=<i> 
it VeOveneeriBx == 1) ft 
Gv eRe Exe) 0; 
} 
else { 
GvORC TE IBx = I; 
} 


} 
} 


else { 


/* abnormal FIBR detected, discard the SU */ 
if (dv_RC_abnormal_FIBR_flag) { 


/* declare link failure as this is 2nd consecutive */ 
/* time abnormal FIBR ~ 7] 
RC_LSC_LINK_FAILURE (); 
dv_RC_state = STATE_RC_IDLE; 
op_prg_log_entry_write ( 
log_hdle_link_status, 
"RC: 2nd abnormal FIBR, FIBX: %d, FIBR: %d", 
dv_RC_FIBX, 
Av_RC_FIBR) ; 
op_prg_log_entry_write ( 
log_hdle_link_status, 
"RC: state IN_SERVICE->IDLE, link failure due to 
abnormal FIBR twice"); 
} 


else { 


/* first time abnormal FIBR, if retransmission is */ 


/* required, send BSNR and BIBR updates to TXC, ef 
/* else mark abnormal FIBR, UNF, counter for ed 
/* unreasonable FIBR is started by reset oy, 
wE (Gv_ROMBRER == 1) [( 


RC_TXC_BSNR_AND_BIBR(dv_RC_BSNR, dv_TXC_BIBR); 
dv_RC_FSNF = mtp2_increment (dv_RC_BSNR, 1, MOD_SN); 
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} 
else { 
dv_RC_abnormal_FIBR_flag = TRUE; 
dv_RC_UNF = 0; 
op_prg_log_entry_write ( 
log_hdle_link_status, 
"RC: lst abnormal FIBR, FIBX: %d, FIBR: %d", 
dv_RC_FIBX, 
dv_RC_FIBR) ; 


} 
} 


else { 


/* abnormal BSNR detected for current SU, if this is the 2nd */ 
/* time, declare link failure vd} 
if (dv_RC_abnormal_BSNR_flag) { 
RC_LSC_LINK_FAILURE () ; 
dv_RC_state = STATE_RC_IDLE; 
op_prg_log_entry_write ( 
log_hdle_link_status, 
"RC: 2nd abnormal BSNR, FSNF: %d, FSNT: %d, BSNR: %d", 
dv_RC_FSNF, 
Av_RC_FSNT, 
dv_RC_BSNR) ; 
op_prg_log_entry_write ( 
log_hdle_link_status, 
"RC: state IN_SERVICE->IDLE, link failure due to abnormal 
BSNR twice"); 
} 
else { 
dv_RC_abnormal_BSNR_flag = TRUE; 
dv_RC_UNB = QO; 
op_prg_log_entry_write ( 
log_hdle_link_status, 
"RC: Ist abnormal BSNR, FSNF: %d, FSNT: d, BSNR: %d", 
dv_RC_FSNF, 
dv_RC_FSNT, 
dv_RC_BSNR); 


break; 
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K. EXECUTIVE FOR “RC” STATE 


, == = = = = SS ee ee a es ec ee ee 
/* Basic Reception Control (RC) * / 
/* Signaling System 7 (SS7), Message Transfer Part Level 2 (MTP2) x 
/* Note: sale f 
1 as This defines all RC processing which includes handling of a 
es incoming internal messages and timer expiry. “/ 
| is Messages are proccessed in FIFO order. 7 
[% Each message is processed according to the algorithm * / 
Vie as defined in ITU-T 0.703 (Jul 96), Fig 14. ~/, 
(= = SS a SS Se aS a Se SS ee = ae a ee a ee ee 


/* If incoming message exists, remove the message packet */ 


/* from the buffer and process it Lary 
/* The first field in each packet is always the message */ 
/* code, it can be followed by one or more fields ef 
/* depending on the message */ 


if (top_subq_empty(RC_BUFFER)) { 
pkptr = op_subq_pk_remove (RC_BUFFER, OPC_QPOS_HEAD) ; 
op_pk_fd_get(pkptr, FD_INDEX_1ST, &msg_code) ; 
switch (msg_code) { 


case MSG_LSC_RC_START: 


if (dv_RC_state == STATE_RC_IDLE) { 

av_RC_FSNX = 0; 

av RC Piss = le 

av_RC_FSNF = 0; 

dv RE PSND = 127; 

dv RC ORTR. = 0; 
adv_RC_MSU_FISU_accepted_flag = FALSE; 
adv_RC_abnormal_BSNR_flag = FALSE; 
dv_RC_abnormal_FIBR_flag = FALSE; 
dv_RC_congestion_discard_flag = FALSE; 
dv_RC_congestion_accept_flag = FALSE; 


dv_RC_state = STATE_RC_IN_SERVICE; 
op_prg_log_entry_write(log_hdle_link_status, "RC: state IDLE- 
>IN_SERVICE, START as instructed by LSC"); 
} 
break; 


case MSG_LSC_RC_STOP: 

1f (dv_RC_state == STATE_RC_IN_SERVICE) { 
RC_CC_NORMAL () ; 
dv_RC_state = STATE_RC_IDLE; 
op_prg_log_entry_write(log_hdle_link_status, "RC: state IN_SERVICE- 

>IDLE, STOP as instructed by LSC"); 
} 
break; 


case MSG_LSC_RC_RETRIEVE_BSNT: 
if ((dv_RC_state == STATE_RC_IDLE) || (dv_RC_state == 
STATE_RC_IN_SERVICE)) { 
dv_RC_BSNT = mtp2_decrement (dv_RC_FSNX, 1, MOD_SN); 


/* send to L3 BSNT mumber */ 
mtp2_send_external_msg(mtp3_id, MSG_RC_TCOC_BSNT, dv_RC_BSNT, 
iciptr_ external) ; 


} 
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break; 


case MSG_LSC_RC_RETRIEVE_FSNX: 

if (dv_RGwstate ==—STATESRC INeSERVICE). { 
RC_TXC_FSNX (dv_RC_FSNX) ; 
dv_RC_congestion_discard_flag = FALSE; 
dv_RC_congestion_accept_flag = FALSE; 
RC_CC_NORMAL () ; 
Gv RC RTR ==..07 

} 

break; 


case MSG_LSC_RC_REJECT_MSU_FISU: 
if (dv_RC_state == STATE_RC_IN_SERVICE) { 
dv_RC_MSU_FISU_accepted_flag = FALSE; 
} 


break; 


case MSG_LSC_RC_ACCEPT_MSU_FISU: 
if (dv_RC_state == STATEx£{RC_IN_SERVICE) { 
dv_RC_MSU_FISU_accepted_flag = TRUE; 
} 


break; 


case MSG_TXC_RC_FSNT: 
if (dv_RC_state == STATE_RC_IN_SERVICE) { 
op_pk_fd_get(pkptr, FD_INDEX_2ND, &dv_RC_FSNT) ; 
} 
break; 


case MSG _XXX_RC_CONGESTION_DISCARD: 
if (dv_RC_state == STATE_RC_IN_SERVICE) { 
dv_RC_congestion_discard_flag = TRUE; 
} 


break; 


case MSG _ XXX RC _CONGESTION_ACCEPT: 
if (dv_RC_state == STATE_RC_IN_SERVICE) { 
dv_RC_congestion_accept_flag = TRUE; 
} 


break; 


case MSG_XXX RC NO_CONGESTION: 
if (dv_RC_state == STATE _RC_IN_SERVICE) { 
dv_RC_congestion_discard_flag = FALSE; 
dv_RC_congestion_accept_flag = FALSE; 
RC_CC_NORMAL () ; 
RC_TXC FPSNX (dv _RC_FSNX); 


1f (dv_RC_RTR == 1) { 
RC_TXC_SEND_NACK () ; 
1iM(GVeRG FIBX == 0) { 


ave RC -FIBx =-1; 
} 
else { 
aveRCer i Bx = 0; 
} 
} 
} 
break; 
} 
op_pk_destroy (pkptr) ; 
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} 


/* schedule next internal message processing interrupt */ 
op_intrpt_schedule_self(op_sim_time() + RC_service_time, RC_MSG); 


108 


L. EXECUTIVE FOR “LSC” STATE 


= = SS SS SS ee ee a en a ee ee a eS SS SS SS eS 


/* Link State Control (LSC) 
/* Signaling System 7 (SS7), Message Transfer Part Level 2 (MTP2) 
/* Note: 


a This defines all LSC processing which includes handling of 
Ves incoming internal messages and timer expiry interrupts. 

jg Messages are proccessed in FIFO order. 

13 Each message is processed according to the algorithm 

pe as defined in ITU-T Q.703 (Jul 96), Fig 8. 

7 * et ee 
switch (op_intrpt_code()) { 


case LSC_MSG: 


/* If incoming message exists, remove the message packet */ 


/* from the buffer and process it oe 
/* The first field in each packet is always the message */ 
/* code, it can be followed by one or more fields ed 
/* depending on the message a 


if (!op_subq_empty(LSC_BUFFER)) { 
pkptr = op_subq_ pk_remove(LSC_BUFFER, OPC_QPOS_HEAD) ; 
op_pk_fd_get(pkptr, FD_INDEX_1ST, &msg_code); 
switch (msg_code) { 


case MSG_IAC_LSC_ALIGNMENT_COMPLETE: 
if (dv_LSC_state == STATE_LSC_INITIAL ALIGNMENT) { 
LSC_SUERM_START () ; 
mtp2_timer_start(&dv_timerl) ; 


ai 
ae! 
gar 
Py 
* Gh 
ales 
ay) 
ae 


/* go to "aligned not ready" state and wait for recovery if 


Meco = = / 


/* processor outage, else go ahead and assume "alignment 


ready" it 


if (dv_LSC_local_processor_outage_during_alignment_flag) { 


LSC_POC_LOCAL_PRO_OUTAGE () ; 
LSC_TX@e SEND _STPO() ; 
LSC_RC_REJECT_MSU_FISU(); 
dv_LSC_state = STATE_LSC_ALIGNED_NOT_READY; 
op_prg_log_entry_write(log_hdle_link_status, 
INITIAL ALIGNMENT->ALIGNED_NOT_READY") ; 
} 
else { 
ESCerxne SEND Eis Ui; 
ESG2ARC ACCEPT _MSU-FISU(); 
dv_LSC_state = STATE_LSC_ALIGNED_READY; 
op_prg_log_entry_write(log_hdle_link_status, 
INITIAL_ALIGNMENT->ALIGNED_READY") ; 
} 
} 


break; 
case MSG_IAC_LSC_ALIGNMENT_NOT_POSSIBLE: 


/* alignment not possible, reset flags and go "out 
we’! 

/* RC is stopped, IAC will stop by itself 
at j 

if (dv_LSC_state == STATE_LSC_INITIAL_ALIGNMENT) { 
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"LSC: state 


HOPS) OO 7 alee hey = 


of service" 


mtp2_send_external_msg(mtp3_id, MSG_LSC_LSAC_OUT_SERVICE, 
OwnJid, Leéi1ptr external); 

LSC_RC_STOP(); 

LSC_TXC_SEND_SIOS(); 

dv_LSC_local_processor_outage_during_alignment_flag = FALSE; 

dv_LSC_emergency_flag = FALSE; 

av_LSC_state = STATE_LSC_OUT_SERVICE; 

op_prg_log_entry_write(log_hdle_link_status, "LSC: state 
INITIAL ALIGNMENT->OUT_SERVICE") ; 

} 


break; 


case MSG_TXC_LSC_LINK_FAILURE: 


/* link failed, remote congestion detected by TXC af 
/* processor outage flags need not be reset 2 
/* since it has to be clear for LSC to be in service */ 
if (dv_LSC_state == STATE_LSC_IN_SERVICE) { 


mtp2_send_external_msg(mtp3_id, MSG_LSC_LSAC_OUT_SERVICE, 
own_id, iciptr_external) ; 

LSC_SUERM_STOP(); 

LSC RC STOP(); 

LSC_TXC_SEND_SIOS(); 

av_LSC_emergency_flag = FALSE; 

dv_LSC_state = STATE_LSC_OUT_SERVICE; 

op_prg_log_entry_write(log_hdle_link_status, "LSC: state 
IN_SERVICE->OUT_SERVICE") ; 

} 


break; 


case MSG_RC_LSC_SIO: 
if (dv_LSC_state == STATE_LSC_ALIGNED_READY) { 
Mtp2_ timer _stop(&dv_ timer!) 
mtp2_send_external_msg (mtp3_id, MSG_LSC_LSAC_OUT_SERVICE, 
own_id, iciptr_external); 
LSC_RC_STOP(); 
LSC_SUERM_STOP(); 
LSC_TXC_SEND_SIOS(); 
av_LSC_emergency_flag = FALSE; 
dv_LSC_state = STATE_LSC_OUT_SERVICE; 
op_prg_log_entry_write(log_hdle_link_status, "LSC: state 
ALIGNED_READY->OUT_SERVICE"); 
} 
else if (dv_LSC_state == STATE_LSC_ALIGNED_NOT_READY) { 
mtp2_timer_stop(&dv_timerl1); 
mtp2_send_external_msg (mtp3_id, MSG_LSC_LSAC_OUT_SERVICE, 
own_id, iciptr_external); 
LSC_RC_STOP(); 
LSC_SUERM_STOP() ; 
LSC_TXC_SEND_SIOS(); 
LSC_POC_STOP(); 
dv_LSC_emergency_flag = FALSE; 
dv_LSC_local_processor_outage_during_alignment_flag = FALSE; 
dv_LSC_state = STATE_LSC_OUT_SERVICE; 
op_prg_log_entry_write(log_hdle_link_status, "LSC: state 
ALIGNED_NOT_READY~->OUT_SERVICE") ; 
} 
else if (d@v_LSC_state == STATE_LSC_IN_SERVICE) { 
mtp2_send_external_msg(mtp3_id, MSG_LSC_LSAC_OUT_SERVICE, 
own_id, iciptr_external); 
LSC_SUERM_STOP(); 
LSC_RC_STOP(); 
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LSC_TXC_SEND_STIOS (); 
dv_LSC_emergency_flag = FALSE; 
dv_LSC_state = STATE_LSC_OUT_SERVICE; 
op_prg_log_entry_write(log_hdle_link_status, "LSC: state 
IN_SERVICE->OUT_SERVICE") ; 
} 
else if (dv_LSC_state == STATE_LSC_PROCESSOR_OUTAGE) { 
mtp2_send_external_msg(mtp3_id, MSG_LSC_LSAC_OUT_SERVICE, 
own_1id, iciptr_external) ; 
LSC_SUERM_STOP() ; 
LSC_RC_STOP(); 
LSC_POC_STOP() ; 
LSC_TXC_SEND_SIOS () ; 
dv_LSC_emergency_flag = FALSE; 
dv_LSC_local_processor_outage_during_alignment_flag = FALSE; 
dv_LSC_state = STATE_LSC_OUT_SERVICE; 
op_prg_log_entry_write(log_hdle_link_status, "LSC: state 
PROCESSOR_OUTAGE->OUT_SERVICE") ; 
} 


break; 


case MSG_RC_LSC_SIN: 
if (dv_LSC_state == STATE_LSC_IN_SERVICE) { 
mtp2_send_external_msg(mtp3_id, MSG_LSC_LSAC_OUT_SERVICE, 
own_id, iciptr_external) ; 
LSC_SUERM_STOP () ; 
LSC_RC_STOP(); 
LSC_TXC_SEND_SIOS(); 
dv_LSCc_emergency_flag = FALSE; 
dav_LSc_state = STATE_LSC_OUT_SERVICE; 
op_prg_log_entry_write(log_hdle_link_status, "LSC: state 
IN_SERVICE->OUT_SERVICE") ; 
} 
else if (dv_LSC_state == STATE_LSC_PROCESSOR_OUTAGE) { 
mtp2_send_external_msg(mtp3_id, MSG_LSC_LSAC_OUT_SERVICE, 
own_id, iciptr_external); 
LSC_SUERM_STOP() ; 
LSC_RC_STOP()); 
LSC_POC_STOP () ; 
LSGIrTxe SEND _ SIOS(); 
dv_LSC_emergency_flag = FALSE; 
dv_LSC_local_processor_outage_during_alignment_flag = FALSE; 
dv_LSC_state = STATE_LSC_OUT_SERVICE; 
op_prg_log_entry_write(log_hdle_link_status, "LSC: state 
PROCESSOR_OUTAGE->OUT_SERVICE") ; 
} 


break; 


case MSG_RC_LSC_SIE: 
if (dv_LSC_state == STATE_LSC_IN_SERVICE) { 
mtp2_send_external_msg(mtp3_id, MSG_LSC_LSAC_OUT_SERVICE, 
own_id, iciptr_external); 
LSC_SUERM_STOP(); 
LSC_RC_STOP(); 
LSC_TXC_SEND_SIOS(); 
dv_LSC_emergency_flag = FALSE; 
adv_LSC_state = STATE_LSC_OUT_SERVICE; 
op_prg_log_entry_write(log_hdle_link_status, "LSC: state 
IN_SERVICE->OUT_SERVICE") ; 
} 
else if (dv_LSC_state == STATE_LSC_PROCESSOR_OUTAGE) { 


lie 


mtp2_send_external_msg(mtp3_id, MSG_LSC_LSAC_OUT_SERVICE, 
own_id) -vellptr external); 

LSC_SUERM_STOP(); 

LSC_RC_STOP(); 

LSC_POC_STOP(); 

LSe TAC SEND SIOS(); 

dav_LSC_emergency_flag = FALSE; 

dv_LSC_local_processor_outage_during_alignment_flag = FALSE; 

av_LSC_state = STATE_LSC_OUT_SERVICE; 

op_prg_log_entry_write(log_hdle_link_status, "LSC: state 
PROCESSOR_OUTAGE->OUT_SERVICE") ; 

} 


break; 


case MSG_RC_LSC_SIOS: 
if (dv_LSC_state == STATE_LSC_ALIGNED_READY) { 
mtp2_timer_stop(&dv_timerl) ; 
mtp2_send_external_msg(mtp3_id, MSG_LSC_LSAC_OUT_SERVICE, 
OWhoId,s1Ciptr externa), 
LSC_RC_STOP(); 
LSC_SUERM_STOP(); 
ESCETRCaSEhpESIOS () ; 
dv_LSC_emergency_flag = FALSE; 
av_LSC_state = STATE_LSC_OUT_SERVICE; 
op_prg_log_entry_write(log_hdle_link_status, "LSC: state 
ALIGNED_READY->OUT_SERVICE, SIOS received"); 
} 
else if (dv_LSC_state == STATE_LSC_ALIGNED_NOT_READY) { 
mtp2_timer_stop(&dv_timerl) ; 
mtp2_send_external_msg(mtp3_id, MSG_LSC_LSAC_OUT_SERVICE, 
own_id, iciptr_external) ; 
LSC_RC_STOP(); 
LSC_SUERM_STOP(); 
LSC_TX© SEND" SIOS ()% 
LSC_POC_STOP(); 
dv_LSC_emergency_flag = FALSE; 
dv_LSC_local_processor_outage_during_alignment_flag = FALSE; 
dv_LSC_state = STATE_LSC_OUT_SERVICE; 
op_prg_log_entry_write(log_hdle_link_status, "LSC: state 
ALIGNED_NOT_READY->OUT_SERVICE, SIOS received") ; 
} 
else if (dv_LSC_state == STATE_LSC_IN_SERVICE) { 
mtp2_send_external_msg(mtp3_id, MSG_LSC_LSAC_OUT_SERVICE, 
own_id, iciptr_external); 
LSC_SUERM_STOP (} ; 
LSE _RCeSTor()-; 
LSC_TXC_SEND_SIOS(); 
dv_LSC_emergency_flag = FALSE; 
dv_LSC_state = STATE_LSC_OUT_SERVICE; 
op_prg_log_entry_write(log_hdle_link_status, "LSC: state 
IN_SERVICE->OUT_SERVICE, SIOS received"); 
} 
else if (dv_LSC_state == STATE_LSC_PROCESSOR_OUTAGE) { 
mtp2_send_external_msg (mtp3_id, MSG_LSC_LSAC_OUT_SERVICE, 
own_id, iciptr_external) ; 
LSC_SUERM_STOP(); 
LSC_RC_STOP(); 
LSC_POC_STOP(); 
LSC_TXC_SEND_SIOS()}; 
dv_LSC_emergency_flag = FALSE; 
dv_LSC_local_processor_outage_during_alignment_flag = FALSE; 
dv_LSC_state = STATE_LSC_OUT_SERVICE; 


ie 


op_prg_log_entry_write(log_hdle_link_status, "LSC: state 
PROCESSOR_OUTAGE->OUT_SERVICE, SIOS received"); 
} 


break; 


case MSG_RC_LSC_SIPO: 
if (dv_LSC_state == STATE_LSC_ALIGNED_READY) { 
mtp2_timer_stop(&dv_timerl1) ; 
mtp2_send_external_msg(mtp3_id, 
MSG_LSC_LSAC_REMOTE_PRO_OUTAGE, own_id, iciptr_external) ; 
LSC_POC_REMOTE_PRO_OUTAGE () ; 
dv_LSC_state = STATE_LSC_PROCESSOR_OUTAGE; 
op_prg_log_entry_write(log_hdle_link_status, "LSC: state 
ALIGNED_READY->PROCESSOR_OUTAGE" ) ; 
} 
else if (dv_LSC_state == STATE_LSC_ALIGNED_NOT_READY) { 
mtp2_send_external_msg(mtp3_id, 
MSG_LSC_LSAC_REMOTE_PRO_OUTAGE, own_id, iciptr_external) ; 
LSC_POC_REMOTE_PRO_OUTAGE () ; 
mtp2_timer_stop(&dv_timerl) ; 
dv_LSC_state = STATE_LSC_PROCESSOR_OUTAGE; 
op_prg_log_entry_write(log_hdle_link_status, "LSC: state 
ALIGNED_NOT_READY->PROCESSOR_OUTAGE") ; 
else if (dv_LSC_state == STATE_LSC_IN_SERVICE) { 
LSC_TXC_SEND_FISU(); 
mtp2_send_external_msg(mtp3_id, 
MSG_LSC_LSAC_REMOTE_PRO_OUTAGE, own_id, iciptr_external) ; 
LSC_POC_REMOTE_PRO_OUTAGE () ; 
dv_LSC_processor_outage_during_service_flag = TRUE; 
dv_LSC_state = STATE_LSC_PROCESSOR_OUTAGE; 
op_prg_log_entry_write(loguahdle link status, “LSC: state 
IN_SERVICE->PROCESSOR_OUTAGE" ) ; 
} 
else if (dv_LSC_state == STATE_LSC_PROCESSOR_OUTAGE) { 
mtp2_send_external_msg(mtp3_id, 
MSG_LSC_LSAC_REMOTE_PRO_OUTAGE, own_id, iciptr_external) ; 
LSC_POC_REMOTE_PRO_OUTAGE () ; 
} 
break; 


case MSG_RC_LSC_FISU_MSU_RECEIVED: 
if (dv_LSC_state == STATE_LSC_ALIGNED_READY) { 
mtp2_send_external_msg(mtp3_id, MSG_LSC_LSAC_IN_SERVICE, 
own_id, iciptr_external); 
mtp2_timer_stop (&dv_timerl1) ; 
LSC_TXC_SEND_MSU () ; 
dv_LSC_state = STATE_LSC_IN_SERVICE; 
op_prg_log_entry_write(log_hdle_link_status, "LSC: state 
ALIGNED_READY->IN_SERVICE") ; 
} 
else if (dv_LSC_state == STATE_LSC_ALIGNED_NOT_READY) { 
mtp2_send_external_msg(mtp3_id, MSG_LSC_LSAC_IN_SERVICE, 
own_id, iciptr_external) ; 
mtp2_timer_stop (&dv_timerl1) ; 
av_LSC_state = STATE_LSC_PROCESSOR_OUTAGE; 
op_prg_log_entry_write(log_hdle_link_status, "LSC: state 
ALIGNED_NOT_READY->PROCESSOR_OUTAGE") ; 
} 
else if (dv_LSC_state == STATE_LSC_PROCESSOR_OUTAGE) { 
LSC_POC_REMOTE_PRO_RECOVERED () ; 


Us 


mtp2_send_external_msg(mtp3_id, 
MSG_LSC_LSAC_REMOTE_PRO_RECOVERED, own_id, iciptr_external) ; 
} 


break; 


case MSG_RC_LSC_LINK_FAILURE: 
if (dv_LSC_state == STATE_LSC_INITIAL_ALIGNMENT) { 
mtp2_send_external_msg(mtp3_id, MSG_LSC_LSAC_OUT_SERVICE, 
own_id, iciptr_external); 
LSC_IAC_STOP(); 
LSC_RC_STOP() ; 
LSC_TXC_SEND_SIOS (); 
dv_LSC_lecal_processor_outage_during_alignment_flag = FALSE; 
dv_LSC_emergency_flag = FALSE; 
Ovi LSGesta rcs = STATE LSC {OULZSERVICGE, 
op_prg_log_.entry_write(log_hdle_link_status, "LSC: state 
INITIAL _ALIGNMENT->OUT_SERKVICE" ) ; 
} 
else if (dv_LSC_state == STATE_LSC_ALIGNED_READY) { 
mtp2_timer_stop (&dv_timerl) ; 
mtp2_send_external_msg(mtp3_id, MSG_LSC_LSAC_OUT_SERVICE, 
own_id, iciptr_external); 
LSC_RC_STOP (); 
LSC_SUERM_STOP () ; 
LSC_TXC_SEND_SIOS() ; 
dv_LSC_emergency_flag = FALSE; 
dv_LSC_state = STATE_LSC_OUT_SERVICE; 
op_prg_log_entry_write(log_hdle_link_status, "LSC: state 
ALIGNED_READY->OUT_SERVICE, link failure declared by RC"); 
} 
else if (dv_LSC_state == STATE_LSC_ALIGNED_NOT_READY) { 
mtp2_timer_stop(&dv_timerl1) ; 
mtp2_send_external_msg(mtp3_id, MSG_LSC_LSAC_OUT_SERVICE, 
own_id, iciptr_external); 
LSC_RC_STOP(); 
LSC_SUERM_STOP () ; 
LSC_TXC_SEND_SIOS () ; 
LSC POGCESTOrT): 
dv_LSC_emergency_flag = FALSE; 
dv_LSC_local_processor_outage_during_alignment_flag = FALSE; 
dv_LSC_state = STATE_LSC_OUT_SERVICE; 
op_prg_log_entry_write(log_hdle_link_status, "LSC: state 
ALIGNED_NOT_READY->OUT_SERVICE, link failure declared by RC"); 
} 
else if (dv_LSC_state == STATE_LSC_IN_SERVICE) { 
mtp2_send_external_msg(mtp3_id, MSG_LSC_LSAC_OUT_SERVICE, 
own_id, iciptr_external); 
LSC_SUERM_STOP(); 
LSC_RC_STOP(); 
LSC_TXCSSENDESTIOS(); 
dv_LSC_emergency_flag = FALSE; 
dv_LSC_state = STATE_LSC_OUT_SERVICE; 
op_prg_log_entry_write(log_hdle_link_status, "LSC: state 
IN_SERVICE->OUT_SERVICE, link failure declared by RC"); 
} 
else if (dv_LSC_state == STATE_LSC_PROCESSOR_OUTAGE) { 
mtp2_send_external_msg(mtp3_id, MSG_LSC_LSAC_OUT_SERVICE, 
own_id, iciptr_external) ; 
LSC_SUERM_STOP () ; 
LSC _RESSTOP (); 
LSC_POC_STOP(); 
LSC_TXC_SEND_SIOS(); 
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dv_LSC_emergency_flag = FALSE; 
dv_LSC_local_processor_outage_during_alignment_flag = FALSE; 
dv_LSC_state = STATE_LSC_OUT_SERVICE; 
op_prg_log_entry_write(log_hdle_link_status, "LSC: state 
PROCESSOR_OUTAGE~>OUT_SERVICE, link failure declared by RC"); 
} 


break; 


case MSG_SUERM_LSC_LINK_FAILURE: 
if (dv_LSC_state == STATE_LSC_ALIGNED_READY) { 
mtp2_timer_stop (&dv_timerl1) ; 
mtp2_send_external_msg(mtp3_id, MSG_LSC_LSAC_OUT_SERVICE, 
own_id, iciptr_external) ; 
LSGSRG~ STOP () = 
LSC_SUERM_STOP(); 
LSC_TXC SEND S1TOS(); 
dv_LSC_emergency_flag = FALSE; 
dav_LSC_state = STATE_LSC_OUT_SERVICE; 
op_prg_log_entry_write(log_hdie_link_status, "LSC: state 
ALIGNED_READY~>OUT_SERVICE, link failure declared by SUERM"); 
} 
else if (dv_LSC_state == STATE_LSC_ALIGNED_NOT_READY) { 
mtp2_timer_stop(&dv_timerl1) ; 
mtp2_send_external_msg(mtp3_id, MSG_LSC_LSAC_OUT_SERVICE, 
own_id, iciptr_external); 
LSC_RC_STOP() ; 
LSC_SUERM_STOP (); 
LSC_TXC_SEND_SIOS(); 
LSC_POC_STOP(); 
dv_LSC_emergency_flag = FALSE; 
dv_LSC_local_processor_outage_during_alignment_flag = FALSE; 
dv hSC estate = STATE LSC OUT _SERVICE-; 
op_prg_log_entry_write(log_hdie_link_status, "LSC: state 
ALIGNED_NOT_READY~>OUT_SERVICE, link failure declared by SUERM"); 
} 
else if (dv_LSC_state == STATE_LSC_IN_SERVICE) { 
mtp2_send_external_msg(mtp3_id, MSG_LSC_LSAC_OUT_SERVICE, 
own_id, iciptr_external) ; 
LSC_SUERM_STOP(); 
BSeGeReesTCr ©); 
LSC -TXC SEND. SIOS (i 
dv_LSC_emergency_flag = FALSE; 
av_LSC_state = STATE_LSC_OUT_SERVICE; 
op_prg_log_entry_write(log_hdlie_link_status, "LSC: state 
IN_SERVICE~>OUT_SERVICE, link failure declared by SUERM"); 
} 
else if (dv_LSC_State == STATE_LSC_PROCESSOR_OUTAGE) { 
mtp2_send_external_msg(mtp3_id, MSG_LSC_LSAC_OUT_SERVICE, 
own_id, iciptr_external); 
LSC_SUERM_STOP(); 
LSC_RC_STOP(); 
LSC POG TSTOP(); 
LSC_TXC_SEND_SIOS () ; 
dv_LSC_emergency_flag = FALSE; 
dv_LSC_local_processor_outage_during_alignment_flag = FALSE; 
dv_LSC_state = STATE_LSC_OUT_SERVICE; 
op_prg_log_entry_write(log_hdlie_link_status, "LSC: state 
PROCESSOR_OUTAGE->OUT_SERVICE, link failure declared by SUERM"); 
} 


break; 


case MSG_POC_LSC_NO_PRO_OUTAGE : 


1s 


FALSE; 


if (dv_LSC_state == STATE_LSC_PROCESSOR_OUTAGE) { 


dv_LSC_processor_outage_during_service_flag = FALSE; 

if (dv_LSC_level3_indication_received_flag) { 
dv_LSC_level3_indication_received_flag = FALSE; 
LSC_TXC_SEND_MSU(); 
dv_LSC_local_processor_outage_during_alignment_flag = 


LSC _REZACCEPT_MSU_FiIsU(); 
dv_LSC_state = STATE_LSC_IN_SERVICE; 
op_prg_log_entry_write(log_hdle_link_status, "LSC: state 


PROCESSOR OUTAGE-> ENE SERVICE) 


} 


} 


break; 


case MSG_LSAC_LSC_START: 
if (dv_LSC_state == STATE_LSC_OUT_SERVICE) { 


LSC_RCSSTART CG) 
LSC_TXC_START (); 
if (dv_LSC_emergency_flag) { 
LSC_IAC_EMERGENCY () ; 
} 
LSClTAG] START () ; 
dv_LSC_state = STATE_LSC_INITIAL_ALIGNMENT ; 
op_prg_log_entry_write(log_hdle_link_status, "LSC: state 


OUT_SERVICE->INITIAL_ALIGNMENT, start link"); 
} 


break; 


case MSG ESAC TU ESC{STOE: 
1£ (dv_LSC_state == STATE_LSC_INITIAL_ALIGNMENT) { 


LSC_IAC_STOP () ; 

LSC_RC STOP (); 

LSC_TXC_SEND_SIOS(); 
dv_LSC_local_processor_outage_during_alignment_flag = FALSE; 
dv_LSC_emergency_flag = FALSE; 

dv_LSC_state = STATE_LSC_OUT_SERVICE; 
op_prg_log_entry_write(log_hdle_link_status, "LSC: state 


INITIAL ALIGNMENT-—7OUT SERVICE, »STOP by LSAC:); 
} 
else if (dv_LSC_state == STATE_LSC_ALIGNED_READY) { 


mtp2_timer_stop (&dv_timerl]l); 

LSC_RC_STOP(); 

LSC_SUERM_STOP (); 

LSC_TXC_SEND_SIOSi@)s; 

dv_LSC_emergency_flag = FALSE; 

dv_LSC_state = STATE_LSC_OUT_SERVICE; 
op_prg_log_entry_write(log_hdle_link_status, "LSC: state 


ALIGNED_READY->OUT_SERVICE, STOP by LSAC"); 
} 
else if (dv_LSC_state == STATE _LSC_ALIGNED_NOT_READY) { 


mtp2_timer_stop (&dv_timerl]1) ; 

LSC_RC_STOP () ; 

LSC_SUERM_STOP () ; 

LSC_TXC_SEND_SIOS(); 

LSC_POC_STOP(); 

dv_LSC_emergency_flag = FALSE; 
dv_LSC_local_processor_outage_during_alignment_flag = FALSE; 
dv_LSC_state = STATE_LSC_OUT_SERVICE; 

Op pra log#entry write(log hdle link status, “LSC: state 


ALIGNED_NOT_READY->OUT_SERVICE, STOP by LSAC"); 


} 
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else if (dv_LSC_state == STATE_LSC_IN_SERVICE) { 
LSC_SUERM_STOP(); 
LSC_RC_STOP () ; 
LSC_TXC_SEND_SIOS (); 
dv_LSC_emergency_flag = FALSE; 
dv_LSC_state = STATE_LSC_OUT_SERVICE; 
op_prg_log_entry_write(log_hdle_link_status, "LSC: state 

INESERVICE->OUT_SERVICE, STOP by LSAC"™); 

} 

else if (dv_LSC_state == STATE_LSC_PROCESSOR_OUTAGE) { 
LSC_SUERM_STOP() ; 
LSC_RC_STOP(); 
LSC_POC_STOP(); 
LSC. TXC SEND S10S () ; 
dv_LSC_emergency_flag = FALSE; 
dv_LSC_local_processor_outage_during_alignment_flag = FALSE; 
dv_LSC_state = STATE_LSC_OUT_SERVICE; 
op_prg_log_entry_write(log_hdle_link_status, "LSC: state 

PROCESSOR_OUTAGE~>O0UT_SERVICE, STOP by LSAC"); 
} 


break; 


case MSG_LSAC_LSC_EMERGENCY : 

if (dv_LSC_state == STATE_LSC_OUT_SERVICE) { 
dv_LSC_emergency_flag = TRUE; 

} 

else if (dv_LSC_state == STATE_LSC_INITIAL_ALIGNMENT) { 
dv_LSC_emergency_flag = TRUE; 
LSC_IAC_EMERGENCY () ; 

} 


break; 


case MSG_LSAC_LSC_EMERGENCY_CEASES : 
if (dv_LSC_state == STATE_USC_OUT™SERVICE)™ {( 
dv_LSC_emergency_flag = FALSE; 
} 


break; 


case MSG_LSAC_LSC_CONTINUE: 
if (dv_LSC_state == STATE_LSC_PROCESSOR_OUTAGE) { 
dv_LSC_level3_indication_received_flag = TRUE; 
if (dv_LSC_processor_outage_during_service_flag) { 
} 
else { 
dv_LSC_level3_indication_received_flag = FALSE; 
LSC_TXC_SEND_MSU(); 
dv_LSC_local_processor_outage_during_alignment_flag = 
FALSE; 
LSC_RC_ACCEPT_MSU_FISU(); 
dv_LSC_state = STATE_LSC_IN_SERVICE; 
op_prg_log_entry_write(log_hdle_link_status, "LSC: state 
PROCESSOR_OUTAGE->IN_SERVICE") ; 
} 
} 


break; 


case MSG_LSAC_LSC_FLUSH_BUFFERS : 
if (dv_LSC_state == STATE_LSC_PROCESSOR_OUTAGE) { 
LSC_TXC_FLUSH_BUFFERS () ; 
dv_LSC_level3_indication_received_flag = TRUE; 
if (dv_LSC_processor_outage_during_service_flag) { 


} 
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FALSE; 


else { 
dv_LSC_level3_indication_received_flag = FALSE; 
LSC_TXC_SEND_MSU(); 
dv_LSC_local_processor_outage_during_alignment_flag = 


LSC_RC_ACGEPT_MSU_BEISU(); 
dv_LSC_state = STATE_LSC_IN_SERVICE; 
op_prg_log_entry_write(log_hdle_link_status, "LSC: state 


PROCESSOR_OUTAGE->IN_SERVICE") ; 


} 
} 


break; 


Case MSG TCOC ESC _RETRIEBVELESNT: 


if (dv_LSC_state == STATE_LSC_OUT_SERVICE) { 
PSCSRCORETRIEVEESoN {); 

} 

else if (dv_LSC_state == STATE_LSC_PROCESSOR_OUTAGE) { 
DSC _KRCSREITRIEVE _BSND As, 

} 


break; 


case MSG TeCC UPSeceRETRIEVAL REOG2 eSNG: 


if (dv_LSC_state == STATE_LSC_OUT_SERVICE) { 
LSC]TXC RETRIEVAL REO  FSNGW ; 


} 
else if (dv_LSC_state == STATE_LSC_PROCESSOR_OUTAGE) { 


ESC] TAC RETRIEVALLRECSF SNC) 
} 


break; 


case MSG_MGMT_LSC_POWER_ON: 


if (dv_LSC_state == STATE_LSC_POWER_OFF) { 
LSC_TXC_START (); 
LSC_TXC_SEND_SIOS (); 
LSC_AERM_SET_Ti_To_Tin(); 
dv_LSC_local_processor_outage_during_alignment_flag = FALSE; 
dav_LSC_emergency_flag = FALSE; 
dv_LSC_state = STATE_LSC_OUT_SERVICE; 
op_prg_log_entry_write(log_hdle_link_status, "LSC: state 


POWER_OPF => OUT SERV CE Ve, 


} 


break; 


case MSG_MGMT_LSC_LEVEL3_FAILURE: 


if (dv_LSC_state == STATE_LSC_OUT_SERVICE ) { 
dv_LSC_local_processor_outage_during_alignment_flag = TRUE; 
} 
else if (dv_LSC_state == STATE_LSC_INITIAL_ALIGNMENT) { 
dv_LSC_local_processor_outage_during_alignment_flag = TRUE; 
} 
else if (dv_LSC_state == STATE_LSC_ALIGNED_READY) { 
LSC_POC_LOCAL_PRO_OUTAGE (); 
LSC_TXC_SEND_SIPO() ; 
LSC_RC_REJECT_MSU_FISU(); 
dv_LSC_state = STATE_LSC_ALIGNED_NOT_READY; 
op_prg_log_entry_write(log_hdle_link_status, "LSC: state 


ALIGNED_READY->ALIGNED_NOT_READY " ) ; 


} 
else if (dv_LSC_state == STATE_LSC_IN_SERVICE) { 


LSC_POC_LOCAL_PRO_OUTAGE () ; 
LSC_THG_SEND_SHrO(); 
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LSC _ Re REJECT MSU_FISU(); 
dv_LSC_processor_outage_during_service_flag = TRUE; 
dv_LSC_state = STATE_LSC_PROCESSOR_OUTAGE; 
op_prg_log_entry_write(log_hdle_link_status, "LSC: state 
IN_SERVICE->PROCESSOR_OUTAGE" ) ; 

} 

else if (dv_LSC_state == STATE_LSC_PROCESSOR_OUTAGE) { 
LSC_POC_LOCAL_PRO_OUTAGE () ; 
LSC_TXC_SEND_SIPO(); 

i 

break; 


case MSG_MGMT_LSC_LOCAL_PRO_OUTAGE: 

if (dv_LSC_state == STATE_LSC_OUT_SERVICE) { 
dv_LSC_local_processor_outage_during_alignment_flag = TRUE; 

} 

else if (dv_LSC_state == STATE_LSC_INITIAL_ALIGNMENT) { 
dv_LSC_local_processor_outage_during_alignment_flag = TRUE; 

} 

else if (dv_LSC_state == STATE_LSC_ALIGNED_READY) { 
LSC_POC_LOCAL_PRO_OUTAGE (); 
LSC_TXC_SEND_SIPO(); 
LSC_RC_REJECT_MSU_FISU(); 

} 

else if (dv_LSC_state == STATE _LSC_IN_SERVICE) { 
LSC_POC_LOCAL_PRO_OUTAGE (); 
LSC_TXC_SEND_SIPO(); 
LSC_RC_REJECT_MSU_FISU(); 
dv_LSC_processor_outage_during_service_flag = TRUE; 
dv_LSC_state = STATE_LSC_PROCESSOR_OUTAGE; 
op_prg_log_entry_write(log_hdle_link_status, "LSC: state 

IN_SERVICE->PROCESSOR_OUTAGE") ; 

} 

else if (dv_LSC_state == STATE_LSC_PROCESSOR_OUTAGE) { 
LSC_POC_LOCAL_PRO_OUTAGE (); 
LSC_TXC_SEND_SIPO() ; 

} 

break; 


case MSG_MGMT_LSC_LOCAL_PRO_RECOVERED: 

if (dv_LSC_state == STATE_LSC_OUT_SERVICE) { 
dv_LSC_local_processor_outage_during_alignment_flag = FALSE; 

} 

else if (dv_LSC_state == STATE _LSC_INITIAL_ ALIGNMENT) { 
dv_LSC_local_processor_outage_during_alignment_flag = FALSE; 
dv_LSC_state = STATE_LSC_ALIGNED_READY; 
op_prg_log_entry_write(log_hdle_link_status, "LSC: state 

INITIAL _ALIGNMENT->ALIGNED_ READY") ; 

} 

else if (dv_LSC_state == STATE_LSC_ALIGNED_NOT_READY) { 
LSC_POC_LOCAL_PRO_RECOVERED () ; 
dv_LSC_local_processor_outage_during_alignment_flag = FALSE; 
ESC TXc SEND FISUQ@): 
LSC_RC_ACCEPT_MSU_FISU(); 
Aav_LSC_state = STATE _LSC_ALIGNED_READY; 
op_prg_log_entry_write(log_hdle_link status, "LSC: state 

ALIGNED_NOT_READY->ALIGNED_READY") ; 

} 

else if (dv_LSC_state == STATE_LSC_PROCESSOR_OUTAGE) { 
LSC_POC_LOCAL_PRO_RECOVERED () ; 
LSC_RC_RETRIEVE_FSNX () ; 
LSC_TXC_SEND_FISU(); 
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} 


break; 


case MSG_LSAC_LSC_LOCAL_PRO_OUTAGE: 

if (dv_LSC_state == STATE_LSC_OUT_SERVICE) { 
dv_LSC_local_processor_outage_during_alignment_flag = TRUE; 

} 

else if (dv_LSC_state == STATE_LSC_INITIAL_ALIGNMENT) { 
dv_LSC_local_processor_outage_during_alignment_flag = TRUE; 

} 

else if (dv_LSC_state == STATE_LSC_ALIGNED_READY) { 
LSC_POC_LOCAL_PRO_OUTAGE () ; 
LSC_TXC_SEND_SIPO(); 
LSC_RC_REJECT_MSU_FISU(); 
dv_LSC_state = STATE_LSC_ALIGNED_NOT_READY ; 
op_prg_log_entry_write(log_hdle_link_status, "LSC: state 

ALIGNED_READY->ALIGNED_NOT_READY") ; 

} ; 

else if (dv_LSC_State == STATE_LSC_IN_SERVICE) { 
LSC_POC_LOCAL_PRO_OUTAGE(); 
LSC_TXC_SEND_SIPO(); 
LSC_RC_REJECT_MSU_FISU(); 
dv_LSC_processor_outage_during_service_flag = TRUE; 
dv_LSC_state = STATE_LSC_PROCESSOR_OUTAGE; 
op_prg_log_entry_write(log_hdle_link_status, "LSC: state 

IN_SERVICE->PROCESSOR_OUTAGE" ) ; 

} 

else if (dv_LSC_state == STATE_LSC_PROCESSOR_OUTAGE) { 
LSC_POC_LOCAL_PRO_OUTAGE() ; 
LSC_TXC_SEND_SIPO(); 

} 

break; 


case MSG_LSAC_LSC_LOCAL_PRO_RECOVERED: 

if (dv_LSC_state == STATE_LSC_OUT_SERVICE) { 
dv_LSC_local_processor_outage_during_alignment_flag = FALSE; 

} 

else if (dv_LSC_state == STATE_LSC_INITIAL_ALIGNMENT) { 
dv_LSC_local_processor_outage_during_alignment_flag = FALSE; 
dv_LSC_state = STATE_LSC_ALIGNED_READY ; 
op_prg_log_entry_write(log_hdle_link_status, "LSC: state 

INITAL_ALIGNMENT->ALIGNED_READY") ; 

} 

else if (dv_LSC_state == STATE_LSC_ALIGNED_NOT_READY) { 
LSC_POC_LOCAL_PRO_RECOVERED () ; 
dv_LSC_local_processor_outage_during_alignment_flag = FALSE; 
LSC. TXC SENDEEISU(); 
LSC_RC_ACCEPT_MSU_FISU(); 
dv_LSC_state = STATE_LSC_ALIGNED_READY ; 
op_prg_log_entry_write(log_hdle_link_status, "LSC: state 

ALIGNED_NOT_READY->ALIGNED_READY") ; 

} 

else if (dv_LSC_state == STATE_LSC_PROCESSOR_OUTAGE) { 
LSC_POC_LOCAL_PRO_RECOVERED () ; 
LSC_RC_RETRIEVE_FSNX () ; 
LSC TAC __SENDIF ESU(); 

} 

break; 

7g 
op_pk_destroy(pkptr) ; 
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/* schedule next internal message processing interrupt */ 
op_intrpt_schedule_self(op_sim_time() + LSC_service_time, LSC_MSG) ; 
break; 


case T1,_EXPIRE: 


/* process expiry of Tl, Timer "Alignment Ready" */ 
/* Timer which limits the time LSC has to change */ 
/* to Service once alignment is ready, else LSC */ 
/* will go back to Out of Service tf 
if (dv_LSC_state == STATE_LSC_ALIGNED_READY) { 
mtp2_send_external_msg(mtp3_id, MSG_LSC_LSAC_OUT_SERVICE, 0, 
iciptr_external); 
LSC] RC. STOP OQ): 
LSC_SUERM_STOP(); 
LSC_TXC_SEND = SIOS(); 
dv_LSC_emergency_flag = FALSE; 
dv_LSC_state = STATE_LSC_OUT_SERVICE; 
op_prg_log_entry_write(log_hdle_link_status, "LSC: state 
ALIGNED_READY->OUT_SERVICE") ; 
i 
else if (dv_LSC_state == STATE_LSC_ALIGNED_NOT_READY) { 
mtp2_send_external_msg(mtp3_id, MSG_LSC_LSAC_OUT_SERVICE, 0, 
1ciptr_external); 
LSC_RC_STOP(); 
LSC_SUERM_STOP(); 
LSC_TXC_SEND_SIOS(); 
LSC_POC_STOP(); 
dv_LSC_emergency_flag = FALSE; 
dv_LSC_local_processor_outage_during_alignment_flag = FALSE; 
dv_LSC_state = STATE_LSC_OUT_SERVICE; 
op_prg_log_entry_write(log_hdle_link_status, "LSC: state 
ALIGNED_NOT_READY->OUT_SERVICE"); 
} 


break; 
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M. EXECUTIVE FOR “IAC” STATE 

yess oe oe oe ow am aw ane ane ane Gas Gas Gas Gas Ga Gas Gan Gas Gas Gas Gn ane aw ==> aw aw = a= am aw ae om ame an Gms Gms aw ane ans ane one ene ane ame ams ane ane ane ame ome ome ome aoe one ome ons ome Gum ane Que au Gum Que aus =e as aus o> oom ays 
/* Initial Alignment Control (IAC) wy 
/* Signaling System 7 (SS7), Message Transfer Part Level 2 (MTP2) eae 
/* Note: ae 
1s This defines all IAC processing which includes handling of */ 
ee incoming internal messages and timer expiry interrupts. * / 
jas Messages are proccessed in FIFO order. * / 
ies Each message is processed according to the algorithm x / 
oe as defined in ITU-T 0.703 “@uleo6)— Fig 9. * / 
2 = a a a a a ee ee ee eS oe ee ee a ee ee ee ee ee 


Switehe(op intrpt_coede ) jt 


case IAC_MSG: 


/* I£f incoming message exists, remove the message packet 
/* from the buffer and process it 

/* The first field in each packet is always the message 
/* code, it can be followed by one or more fields 

/* depending on the message 


if (!op_subq_empty(IAC_BUFFER)) { 
pkptr = op_subq_pk_remove(IAC_BUFFER, OPC_QPOS_HEAD) ; 
op_pk_fd_get(pkptr, FD_INDEX_1ST, &msg_code) ; 
switch (msg_code) { 


case MSG_LSC_IAC_START: 


ay, 


ors 
Tey 
a 


/* start proving by sending out SIO and activate timer2 */ 


if (dv_IAC_state == STATE_IAC_IDLE) { 
TAC_TXC SEND2=SIOG)> 
mtp2_timer_start (&dv_timer2) ; 
dv_IAC_state = STATE_IAC_NOT_ALIGNED; 
op_prg_log_entry_write(log_hdle_link_status, 


LDEE->NOT_ALIGNED~ );; 


} 


break; 


case MSG_LSC_IAC_STOP: 
if (dv_IAC_state == STATE_IAC_NOT_ALIGNED) { 
mtp2_timer_stop(&dv_timer2) ; 
dv_IAC_emergency_flag = FALSE; 
dv_IAC_state = STATE_IAC_IDLE; 
op_prg_log_entry_write(log_hdle_link_status, 


NOT_ALIGNED->IDLE" ) ; 


} 

else if (dv_IAC_state == STATE_IAC_ALIGNED) { 
mtp2_timer_stop(&dv_timer3) ; 
dv_IAC_emergency_flag = FALSE; 
dv_IAC_state = STATE_IAC_IDLE; 
op_prg_log_entry_write(log_hdle_link_status, 

ALIGNED->IDLE"); 
} 
else if (dv_IAC_state == STATE_IAC_PROVING) { 


mtp2_timer_stop(&dv_timer4) ; 
IAC_AERM_STOP(); 
dv_IAC_emergency_flag = FALSE; 
dv_IAC_state = STATE_IAC_IDLE; 


ye 


"TAC: state 


"TAC: state 


"TAC: state 


PROVING->IDLE") ; 
} 


op_prg_log_entry_write(log_hdle_link_status, “IAC: state 


break; 


case MSG_LSC_IAC_EMERGENCY: 


af 


} 


(dv_IAC_state == STATE_IAC_IDLE) { 
dv_IAC_emergency_flag = TRUE; 


else if (dv_IAC_state == STATE_IAC_NOT_ALIGNED) { 


} 


dv_IAC_emergency_flag = TRUE; 


else if (dv_IAC_state == STATE_IAC_ALIGNED) { 


} 


IAC_TXC_SEND_SIE(); 
dv_timer4.delay = T4_Pe; 


else if (dv_IAC_state == STATE_IAC_ PROVING) { 


} 


IAC TXC SENBESTE (); 
mtp2_timer_stop(&dv_timer4) ; 
dv_timer4.delay = T4_Pe; 
IAC_AERM_STOP(); 

IAC_AERM SET_Ti_To_Tie(); 
IAC_AERM_START () ; 
dv_IAcC_further_proving_flag = FALSE; 
mtp2_timer_start (&dv_timer4) ; 


break; 


case MSG_RC_IAC_SIO: 


/* 
Js 
fe 
ant 


if IAC is not aligned yet, assume alignment and */ 
start T3 else go back to not aligned if already */ 
aligned 7 
(dv_IAC_state == STATE_IAC_NOT_ALIGNED) { 
mtp2_timer_stop(&dv_timer2); 
if (dv_IAC_emergency_flag) { 

dv_timer4.delay = T4_Pe; 

TAC EI XG SENDESEE)() ; 
} 
else { 

dv_timer4.delay = T4_Pn; 

IAC_TXC_SEND_SIN(); 
} 
mtp2_timer_start (&dv_timer3) ; 
dv_IAC_state = STATE_IAC_ALIGNED; 
op_prg_log_entry_write(log_hdle_link_status, "IAC: state 


NOT_ALIGNED->ALIGNED") ; 


} 


else if (dv_IAC_state == STATE_IAC_PROVING) { 


mtp2_timer_stop (&dv_timer4); 

IAC_AERM_STOP() ; 

mtp2_timer_start (&dv_timer3) ; 

dv_IAC_state = STATE_IAC_ALIGNED; 
op_prg_log_entry_write(log_hdle_link_status, "IAC: state 


PROVING->ALIGNED") ; 


} 


break; 


case MSG_RC_IAC_SIN: 


/* if not aligned yet assume aligned and start timer3 */ 
/* if already aligned, assume proving and start timer4 */ 


Ws 


if (dv_IAC_state == STATE_IAC_NOT_ALIGNED) { 
mtp2_timer_stop (&dv_timer2) ; 
if (dv_IAC_emergency_flag) { 
dv_timer4.delay = T4_Pe; 
IAC_TXC_SEND_SIE(); 
} 
else { 
dv_timer4.delay = T4_Pn; 
IAC_TXC_SEND_SIN(); 
} 
mtp2_timer_start (&dv_timer3) ; 
adv_IAC_state = STATE_IAC ALIGNED; 
op_prg_log_entry_write(log_hdle_link_status, "IAC: state 
NOT_ALIGNED->ALIGNED") ; 
} 
else if (dv_IAC_state == STATE_IAC ALIGNED) { 
mtp2_timer_stop(&dv_timer3) ; 
if (dv_timer4.delay == T4_Pe) { 
IAC_AERM_SET_Ti_To_Tie(); 
} 
IAC_AERM START (); 
mtp2_timer_start (&dv_timer4) ; 
Cvmerne Cp =a0-; 
dv_IAC_further_proving_flag = FALSE; 
dav_IAC_state = STATE_IAC PROVING; 
op_prg_log_entry_write(log_hdle_link_status, "IAC: state 
ALIGNED->PROVING") ; 
} 


break; 


case MSG_RC_IAC_SIE: 
1f (dv_IAC_state == STATE_IAC _NOT_ALIGNED) { 
mtp2_timer_stop (&dv_timer2) ; 
dv_timer4.delay = T4_Pe; 
if (dv_IAC_emergency_flag) { 
IAC_TXC_SEND_SIE(); 
} 
else { 
IAC_TXC_SEND_SIN(); 
} 
mtp2_timer_start (&dv_timer3) ; 
dv_IAC_ state = STATE_IAC ALIGNED; 
op_prg_log_entry_write(log_hdle_link_status, "IAC: state 
NOT_ALIGNED->ALIGNED" ) ; 
} 
else if (dv_IAC_state == STATE_IAC ALIGNED) { 
dv_timer4.delay = T4_Pe; 
mtp2_timer_stop (&dv_timer3) ; 
IAC_AERM_SET_Ti_To_Tie(); 
IAC_AERM_START(); 
mtp2_timer_start (&dv_timer4) ; 
dv_IAC Cp = 0; 
dv_IAC_further_proving_flag = FALSE; 
dv_IAC_state = STATE_IAC_ PROVING; 
op_prg_log_entry_write(log_hdle_link_status, "TAGs state 
ALIGNED->PROVING"); 
} 
else if (dv_IAC_state == STATE_IAC_ PROVING) { 
1f (dv_timer4.delay != T4_Pe) { 
mtp2_timer_stop(&dv_timer4) ; 
dv_timer4.delay = T4_Pe; 
IAC_AERM_STOP(); 
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IAC_AERM_SET_Ti_To_Tie(); 
IAC_AERM_START(); 
dv_IAC_further_proving_flag = FALSE; 
mtp2_timer_start (&dv_timer4) ; 
} 
} 
break; 


case MSG_RC_IAC_SIOS: 


/* opposite end has gone out of service */ 
/* alignment is not possible oy 
if (dv_IAC_state == STATE_IAC_ALIGNED) { 
IAC_LSC_ALIGNMENT_NOT_POSSIBLE (); 
mtp2_timer_stop (&dv_timer3) ; 
dv_IAC_emergency_flag = FALSE; 
dv_IAC_state = STATE_IAC_IDLE; 
op_prg_log_entry_write(log_hdle_link_status, “IAC: state 
ALIGNED->IDLE") ; 
} 
else if (dv_IAC_state == STATE_IAC_PROVING) { 
mtp2_timer_stop(&dv_timer4) ; 
IAC_LSC_ALIGNMENT_NOT_POSSIBLE () ; 
IAC_AERM_STOP(); 
dv_IAC_emergency_flag = FALSE; 
dv_IAC_state = STATE_IAC_IDLE; 
op_prg_log_entry_write(log_hdle_link_status, "IAC: state 
PROVING->IDLE") ; 
} 


break; 
case MSG_AERM_IAC_ABORT_PROVING: 
/* too much link error detected, cancel current proving */ 


/* start another proving period unless this is the 5th */ 
/* consecutive attempt already. Then alignment is not wae 


/* possible sh 
if (dv_IAC_state == STATE_IAC_PROVING) { 

dv FACS Cpe =v LAC Comes. | 

Liee(dverACeGpe——— 5). 


IAC_LSC_ALIGNMENT_NOT_POSSIBLE (); 
mtp2_timer_stop (&dv_timer4) ; 
IAC_AERM_STOP(); 
dv_IAC_emergency_flag = FALSE; 
dv_IAC_state = STATE_IAC_IDLE; 
op_prg_log_entry_write(log_hdle_link_status, “IAC: state 
PROVING->IDLE") ; 
} 
else { 
dv_IAc_further_proving_flag = TRUE; 
} 
} 


break; 
case MSG _DAEDR_IAC_CORRECT_SU: 


/* restart proving when AERM has recovered from failure */ 
1f (dv_IAC_state == STATE_IAC_PROVING) { 
Tr Adv IAC further proving fiag) { 
mtp2_timer_stop (&dv_timer4) ; 
IAC_AERM START (); 
dv_IAC_further_proving_flag = FALSE; 
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mtp2_timer_start (&dv_timer4) ; 
} 
} 
break; 
} 
Op_ pk destroy (pkptr); 
} 
/* schedule next internal message processing interrupt */ 
op_intrpt_schedule_self(op_sim_time() + IAC _service_time, IAC_MSG) ; 
break; 


case T2_EXPIRE: 


/* process expiry of T2, timer “not alignea™ ~/ 

/* alignment not possible as LSC cannot get aligned */ 

/* before timer expire a | 

if (dv_IAC_state == STATE_IAC_ NOT_ALIGNED) { 
IAC_LSC_ALIGNMENT_NOT_POSSIBLE(); 
dv_IAC_emergency_flag = FALSE; 
dv_IAC_state = STATE_IAC_IDLE; 
op_prg_log_entry_write(log_hdle_link_status, "IAC: state NOT_ALIGNED- 

SLOLE ene Expired "he: 
} 
break; 


case T3_EXPIRE: 


/* Process expiry of T3, timer "aligned" aI 
/* Both ends cannot achieved alignment before timer */ 
/* expires alignment not possible = 
if (dv_IAC_state == STATE_IAC_ALIGNED) { 


IAC_LSC_ALIGNMENT_NOT_POSSIBLE() ; 
dv_IAC_emergency_flag = FALSE; 
dv_IAC_state = STATE_IAC_IDLE; 
op_prg_log_entry_write(log_hdle_link_status, "IAC: state ALIGNED->IDLE, 
Ts. Bxpiuved”); 
} 


break; 
case T4_EXPIRE: 


/* process expiry of T4, Proving period timer */ 
/* 2£ not £urthner proving during the period a 
/* alignment is complete else go for another */ 
/* proving period by AERM aly 
if (dv_IAC_state == STATE_IAC_PROVING) { 
if (dv_IAC_further_proving_flag) { 
IAC_AERM_START () ; 
dv_Iac_further_proving_flag = FALSE; 
mtp2_timer_start (&dv_timer4) ; 
} 
else { 
IAC_LSC_ALIGNMENT_COMPLETE () ; 
IAC_AERM_STOP(); 
dv_IAC_emergency_flag = FALSE; 
dv_IAC state = STATE_IAC_IDLE; 
op_prg_log_entry_write(log_hdle_link_status, "IAC: state PROVING- 
>IDLE, alignment complete"); 
} 
} 


break; 
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N. EXECUTIVE FOR “POC” STATE 


Fi * SS SS SS SS SS SS 8 SS SS SS SS SS SS SS SS SS SS SS SS SS SS SS a SS SS © SS SS SS SS SS SS BS SS SS SS SS SS SS SS Ss SS SSS SS SS SSS SSS SS SS SS SS SS SESE aah 
/* Processor Outage Control (POC) ae 
/* Signaling System 7 (SS7), Message Transfer Part Level 2 (MTP2) ae 
/* MNete: ef 
i> This defines all POC processing which includes handling of = 
Vas incoming internal messages. =) 
|e Messages are proccessed in FIFO order. as 
a Each message is processed according to the algorithm ef 
es as defined in ITU-T 90.703 (Jul 96), Fig 10. as 
/ * <a OOOO Ooo Oa Oo a ono ROK — <= = = = = = a = oo a as = = << oo on om 7 


/* If incoming message exists, remove the message packet */ 


/* from the buffer and process it i 4 
/* The first field in each packet is always the message */ 
/* code, it can be followed by one or more fields ily? 
/* depending on the message Ney, 


if (!op_subq_empty(POC_BUFFER)) { 
pkptr = op_subq_pk_remove(POC_BUFFER, OPC_QPOS_HEAD) ; 
op_pk_fd_get(pkptr, FD_INDEX_1ST, &msg_code) ; 
switch (msg_code) { 


case MSG_LSC_POC_LOCAL_PRO_OUTAGE: 
if (d@v_POC_state == STATE_POC_IDLE ) { 
Av_POC_state = STATE_POC_LOCAL_PRO_OUTAGE; 
op_prg_log_entry_write ( 
log_hdle_link_status, 
"POC: state IDLE->LOCAL_PRO_OUTAGE, local pro outage as inform 
by LSE"); 
} 
else if (dv_POC_state == STATE_POC_REMOTE_PRO_OUTAGE) { 
av_POC_state =STATE_POC_BOTH_PRO_OUT; 
op_prg_log_entry_write ( 
log_hdle_link_status, 
"POC: state REMOTE_PRO_OUTAGE->BOTH_PRO_OUT, local pro outage as 
icon by LSC 
} 


break; 


case MSG_LSC_POC_LOCAL_PRO_RECOVERED: 
if (dv_POC_state == STATE_POC_LOCAL_PRO_OUTAGE ) { 
POC_LSC_NO_PRO_OUTAGE () ; 
Aav_POC_state = STATE_POC_IDLE; 
op_prg_log_entry_write { 
log_hdle_link_status, 
"POC: state LOCAL_PRO_OUT->IDLE, local pro recovered as inform 
by ESCs); 
} 
else if (d@v_POC_state == STATE_POC_BOTH_PRO_OUT) { 
Aav_PoC_state = STATE_POC_REMOTE_PRO_OUTAGE; 
op_prg_log_entry_write ( 
log_hdle_link_status, 
"POC: state BOTH_PRO_OUT->REMOTE_PRO_OUTAGE, local pro recovered 
as inform by LSC"); 
} 


break; 


Case MSG2lSC = FOC _ REMOTE FReCsOULAGE: 
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if (dv_POC_state == STATE POGeIDEn sat 
av_POC_state = STATE_POC_REMOTE_PRO_OUTAGE; 
op_prg_log_entry_write ( 
log_hdle_link_status, 
"POC: state IDLE->REMOTE_PRO_OUT, remote pro outage as inform by 
LSGn ye 


} 
else if (dv_POC_state == STATE_POC_LOCAL_PRO_OUTAGE ) { 


dv_POC_state = STATE_POC_BOTH_PRO_OUT; 
op_prg_log_entry_write ( 
log_hdle_link_status, 
"POC: state LOCAL. PRO_OUT-~>BOTH_PRO_OUT, remote pro outage as 
InfLOrm spy ense” ) ; 
} 
break; 


case MSG_LSC_POC_REMOTE_PRO_RECOVERED: 
if (dv_POC_state == STATE_POC_BOTH_PRO_OUT) { 
dv_Poc_state = STATE_POC_LOCAL_PRO_OUTAGE; 
op_prg_log_entry_write ( 
log_hdle_link_status, 
"POC: state BOTH_PRO_OUT->LOCAL_PRO_OUT, remote pro recovered as 
Patorm by LSC"); 


} 
else if (dv_POC_state == STATE_POC_REMOTE_PRO_OUTAGE) { 


POC_LSC_NO_PRO_OUTAGE () ; 
dv_POC_state = STATE_POC_IDLE; 
op_prg_log_entry_write ( 
log_hdle_link_status, 
"POC: state REMOTE_PRO_OUT->IDLE, remote pro recovered as inform 
by LSC"); 
} 


break; 


case MSG_LSC_POC_STOP: 
1f (dv_POC_state == STATE_POC_LOCAL_PRO_OUTAGE ) { 
dav_POC_state = STATE_POC_IDLE; 
op_prg_log_entry_write ( 
log_hdle_link_status, 
"POC: state LOCAL _PRO_OUT->IDLE, STOP by LSC"); 
} 
else if (dv_POC_state == STATE_POC_BOTH_PRO_OUT) { 
dv_Poc_state = STATE_POC_IDLE; 
op_prg_log_entry_write ( 
log_hdle_link_status, 
"POC: state BOTH_PRO_OUT->IDLE, STOP by LSC"); 
} 
else if (dv_POC_state == STATE_POC_REMOTE_PRO_OUTAGE) { 
Gv Pee state = STATES POC. IDLE; 
op_prg_log_entry_write ( 
log_hdle_link_status, 
"POC: state REMOTE_PRO_OUT->IDLE, STOP by LSC"); 
} 
break; 
} 
op_pk_destroy(pkptr); 
) 


/* schedule next internal message processing interrupt */ 
op_intrpt_schedule_self(op_sim_time() + POC_Service_time, POC_MSG) ; 
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O. EXECUTIVE FOR “AERM” STATE 


* ec ae ce ce es wre we we we ae ce ee ee er ce ee ae ae we ee re ee ee ce we we ee a ee we ee we we we we we we we ww we ee we we we ee ee we we we we we we we wm ae ee ee ee 
I a a a i a a a a edd 


/* Alignment Error Rate Monitor (AERM) 


/* Signaling System 7 (SS7), Message Transfer Part Level 2 (MTP2) 
/* Nete: 

Woe This defines all AERM processing which includes handling of 
vies incoming internal messages 

heal Messages are proccessed in FIFO order. 

cg Each message is processed according to the algorithm 

ees as defined in ITU-T 0.703 (Jul 96), Fig 17. 

vs * ——————— oe oo oo oe SS eK KK a <<< <= <= 
/* If incoming message exists, remove the message packet */ 

/* from the buffer and process it gy: 

/* The first field in each packet is always the message */ 

/* code, it can be followed by one or more fields ay 

/* depending on the message sale 


if (!op_subq_empty (AERM_BUFFER)) { 
pkptr = op_subq_pk_remove (AERM_BUFFER, OPC_QPOS_HEAD) ; 
op_pk_fd_get(pkptr, FD_INDEX_1ST, &msg_code) ; 
switch (msg_code) { 


case MSG_LSC_AERM SET_Ti_To_Tin: 
if (dv_AERM_state == STATE_AERM IDLE) { 
dv_AERM_Ti = Tin; 
} 


break; 


case MSG_IAC_AERM SET_Ti_To_Tie: 
if (dv_AERM_state == STATE _AERM IDLE) { 
QvV_AERMOTi = Die: 
} 


break; 


case MSG_IAC_AERM_ START: 
if (dv_AERM_state == STATE_AERM IDLE) { 
Gv_AERM Ga = 0; 


dv_AERM_state = STATE_AERM MONITORING; 


op_prg_log_entry_write ( 
log_hdle_link_status, 


"“AERM: state IDLE->MONITORING, start error monitoring as 


instructed by IAC"); 
} 


break; 


case MSG_IAC_AERM STOP: 
if (dv_AERM_state == STATE_AERM MONITORING) { 
dv_AERM Ti = Tin; 
Gv_AERM_ state = STATE_AERM IDLE; 
op_prg_log_entry_write ( 
log_hdle_link_status, 


sa 
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"AERM: state MONITORING->IDLE, STOP as instructed by IAC"); 


} 


break; 


case MSG_DAEDR_AERM_SU_ERROR: 


/* Increase one count everytime a error SU is recieved 


1Zz9 


a 


/* DAEDR sends an error SU message when a Error SU is received anf 
/* and also for every 16 octets received when in "octet counting */ 
/* mode. ae | 
if (dv_AERM_state == STATE_AERM_ MONITORING) { 
dv_AERM_ Ca = dv_AERM_Ca + 1; 
if (dv_AERM_Ca == dv_AERM Ti) { 
AERM_IAC_ABORT_PROVING () ; 
dv_AERM_state = STATE_AERM_IDLE; 
op_prg_log_entry_write ( 
log_hdle_link_status, 
"AERM: state MONITORING->IDLE, proving fail as too many 
errors detected by DAEDR"); 
} 
} 
break; 
} 
op_pk_destroy(pkptr) ; 
} 


/* schedule next internal message procesSing interrupt */ 
op_intrpt_schedule_self(op_sim_time() + AERM_service_time, AERM_MSG) ; 
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P: EXECUTIVE FOR “SUERM” STATE 


je a ay f 
/* Signal Unit Error Rate Monitor (SUERM) 5 
/* Signaling System 7 (SS7), Message Transfer Part Level 2 (MTP2) yf 
/* Note: ay 
7 This defines all SUERM processing which includes handling of ey 
> incoming internal messages ae 
es Messages are proccessed in FIFO order. oo 
/ abel Each message 1S processed according to the algorithm * / 
Ve as defined in ITU-T 90.703 (Jul 96), Fig 18. ay, 
, * ee ee * ih 


/* If incoming message exists, remove the message packet */ 


/* from the buffer and process it “7 
/* The first field in each packet is always the message */ 
/* code, it can be followed by one or more fields a / 
/* depending on the message ae 


if (!op_subq_empty(SUERM_BUFFER)) { 
pkptr = op_subq_pk_remove (SUERM_BUFFER, OPC_QPOS_HEAD) ; 
op_pk_fd_get(pkptr, FD_INDEX_1ST, &msg_code) ; 
switch (msg_code) { 


case MSG_LSC_SUERM_START: 
if (dv_SUERM_state == STATE_AERM_IDLE) { 
dv_SUERM_Cs = 0; 
dv_SUERM_Nsu = 0; 
dv_SUERM_state = STATE_SUERM_IN_SERVICE; 
op_prg_log_entry_write ( 
log_hdle_link_status, 
"SUERM: state IDLE->IN_SERVICE, START as instructed by LSC"); 
} 


break; 


case MSG_LSC_SUERM_STOP: 
if (dv_SUERM_state == STATE_AERM_IN_SERVICE) { 
dv_SUERM_state = STATE_SUERM_IDLE; 
op_prg_log_entry_write ( 
log_hdle_link_status, 
"SUERM: state IN_SERVICE->IDLE, STOP as instructed by LSC"); 
} 


break; 
case MSG_DAEDR_SUERM_SU_ERROR: 


/* declare error when count reaches T ef 
/* DAEDR sends SU error messages when an SU is in error sty 
/* or whenever 16 octets is received during “octet counting */ 
/* mode". Count is decremented by one whenever 256 SUs are */ 
/* received whenter error or not tay 
if (dv_SUERM_state == STATE_AERM_IN_SERVICE) { 
dv_SUERM_Cs = dv_SUERM_Cs + 1; 
dv_SUERM_Nsu = dv_SUERM_Nsu + 1; 
it (AVoSUERM- Cs == TFT) 4 
SUERM_LSC_LINK_FAILURE () ; 
dv_SUERM_state = STATE_SUERM_IDLE; 
op_prg_log_entry_write ( 
log_hdle_link_status, 
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"SUERM: state IN_SERVICE->IDLE, too many errors as detected 


by DAEDRA: 
} 
else { 
if (dv_SUERM_Nsu == 256) { 
av_SUERM_Nsu = 0; 
if (dv_SUERM_Cs != 0) { 
dv_SUERM_Cs = dv_SUERM_Cs - 1; 
} 
} 
} 
} 
break; 


case MSG _DAEDR_SUERM_CORRECT_SU: 
if (dv_SUERM_state == STATE_AERM_IN_SERVICE) { 
adv_SUERM_Nsu = dv_SUERM_Nsu + 1; 
if (dVESUERM Nsw == 256) { 
dv_SUERM_Nsu = 0; 
if (GAQvVeSUERM"€s "'= 0)" { 

dv_SUERM_Cs = 
} 


AQv_SUERM_Cs - 1; 


} 
} 


break; 


} 
op_pk_destroy(pkptr) ; 
} 


/* schedule next internal message processing interrupt */ 
op_intrpt_schedule_self(op_sim_time() + SUERM_service_time, SUERM_MSG) ; 
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EXECUTIVE FOR “CC” STATE 


— oe ee ee ee a ss is ss a ss se we ww we ee we ce ee we ww ee ee wee ee ee es 
i ce ee a es 


Congestion Control (CC) 
Signaling System 7 (SS7), Message Transfer Part Level 2 (MTP2) 
Note: 
This defines all CC processing which includes handling of 
incoming internal messages and timer expiry. 
Messages are proccessed in FIFO order. 
Each message is processed according to the algorithm 
as defined in ITU-T 9.703 (Jul 96), Fig 19. 


switch (op_intrpt_code()) { 


case CC_MSG: 
/* If incoming message exists, remove the message packet */ 


/* from the buffer and process it aay 
/* The first field in each packet is always the message */ 
/* code, it can be followed by one or more fields aed 
/* depending on the message i 


if (!op_subq_empty(CC_BUFFER)) { 
pkptr = op_subq_pk_remove (CC_BUFFER, OPC_QPOS_HEAD) ; 
op_pk_fd_get (pkptr, FD_INDEX_1ST, &msg_code) ; 
switch (msg_code) { 


case MSG_RC_CC_NORMAL: 
if (dv_cC_state == STATE_CC_LEVEL2_CONGESTION) { 
mtp2_timer_stop(&dv_timerS) ; 
dv_cC_state = STATE_CC_IDLE; 
op_prg_log_entry_write ( 
log_hdle_link_status, 


sy A 
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"CC: state LEVEL2_CONGESTION->IDLE, as inform by RC"); 


} 


break; 


case MSG_RC_CC_BUSY: 
LE (dvecerstate =— Stale cc -rpLs ) { 
CGzTXe SEND=SiES 
mtp2_timer_start (&dv_timerS) ; 
dv_cC_state = STATE_CC_LEVEL2_CONGESTION; 
op_prg_log_entry_write ( 
log_hdle_link_status, 


"CC: state IDLE->LEVEL2_CONGESTION, as inform by RC"); 


} 
break; 
, 
op_pk_destroy(pkptr) ; 
} 
/* schedule next internal message processing interrupt */ 
op_intrpt_schedule_self(op_sim_time() + CC_service_time, CC_MSG) ; 
break; 
case TS_EXPIRE: 
/* process TS expiry, Timer “sending SIB" */ 
if (dv_CC_state == STATE_CC_LEVEL2_CONGESTION) { 
CC_TXC_SEND_SIB(); 
mtp2_timer_start (&dv_timerS) ; 
} 
break; 
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